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THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICt AND SHOULD NOT BE CONSTRUED AS A COMMITMENT Bt DIGITAl 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT, 

NO RESPONSIBILITY IS ASSUMED FOR THE USE OR REl IABU.IT i OF 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED B> DIGITAL OR ITS 
AFFILIATED COMPANIES. 
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.SBTTL GLOBAL OATA SECUON 

j THE GLOBAL OATA SECTION CONTAINS OATA THAT ARE USED 
j IN ilORE THAN ONE TEST. 

.SBTTL APT MAILBOX-ETABLE 



SEQ 0015 



.EVEN 

JMAIL: 

♦MSGTY; 

IFATAL: 

♦TESTN; 

1PASS: 

IDEVCT: 

lUNITi 

IMSGAD: 

IMSRG: 

IETABLE 

IENV: 

$ENVM : 

ISWREG: 

iUSWR: 

JCPUOP: 

*♦ 

i* 

1* 

I* 

s* 

1* 

IETENO: 

.MCXIT 



♦ ♦a************************************,************^*^^ 



.WORD 

.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

.BYTE 
.BYTE 

.WORD 
.WORD 
.WORD 



AliSGTY 

AFATAL 

ATESTN 

APASS 

ADEVCT 

AUNIT 

AMSGAD 

AMSGLG 

AENV 

AENVM 

ASWREG 

AUSWR 

ACPUOP 



jAPT MAILBOX 

, MESSAGE TYPE CODE 

I FATAL ERROR NUMBER 

I TEST NUMBER 

iPASS COUNT 

tDEVICE COUNT 

l I/O UNIT NUMBER 

j MESSAGE ADDRESS 

:MESSAGE LENGTH 

I APT ENVIRONMENT TABLE 

1ENVIRONHENT ByTE 

iENVIRONMENT MODE BITS 

(APT SWITCH REGISTER 

jUSER SWITCHES 

jCPU TYPE .OPTIONS 
BITS 15-11-CPU TYPE 

11/04-01, ll/0f»-02, 11/20-03, 11 -''40-04, 11 /45«0S 
11/70-06, PDQ-O/.Q-IO 
BIT 10-REAL TIME CLOCK 
BIT 9-FLOATING POINT PROCESSOR 
BIT 8-MEMCRY MANAGEMENT 



I THESE LOCATIONS ARE USED IN MORE THAN ONfc TEST TO STORE VECTOR DATA 
1 WHEN THE TEST NEEDS TO HAVE AN ERROR CONDITION RESPOND DIFFERENTLY 
jFROM THE DEFAULT RESPONCE . 
SLOCOO: .WORD 
SL0C01: .WORD 

IN MORE THAN ONE TEST TO STORE UO^K ING DATA, 

iSTORES EXPECTED iGOOO) DATA FOR COMPARISON' 
iSTORES RECIEVED DATA rn BE VERIHED 
l ERROR INDICATOR FOR FLOATING POINT TESTS 
jUSEO TO STORE "MAG" CONDITIONS 
FOR ERROR COUNT 
FOR SWITCH REGISTER ADORES 1 ; 



•THESE LOCATIONS APE USED 


EXPDAT: .WORD 





RE COAT: .WORD 





COUNT : . WORD 





FLAG: .WORD 





ERRCNTj .WORD 





SWR : . WORD 


DSWH 


DISPl AY: .WORD 


DDISP 


•ERFLG: .WORD 





1 THE St LOCATION 


S ARE USED 


DCOUNT: .WORD 





ALLCTR: .WORD 





I OOP IN: .WORD 





SAVSP1: .WORD 





SAVSP2t .WORD 






1 STORAGE 
j STORAGE 
j STORAGE 



BY 



1 ERROR 
MORE TiVN 



U 



FOR 
AG 



DISPLAY REGISTER ADDRESS 



ONE TEST AS LOOP COUNTERS 



1 S TOR AGE FOR UNEXPECTED TRAP OATA 



D2 



GLOBAL 
KOJllA. 


A8b rts os"HH 


6 72 


001066 


000000 


673 


001070 


000000 


674 


001072 


oooooo 


675 


001074 


000000 


676 


001076 


oooooo 


677 


001100 


oooooo 


676 


001102 


oooooo 


67* 


001104 


oooooc 


68C 


001106 


oooooo 


681 


001110 


oooooo 


682 


001112 


oooooo 


o83 


001114 


oooooo 


684 


001116 


oooooo 


685 


001120 


oooooo 


686 






o8 '■* 






t^S 






689 






69C 






6*1 






692 






693 






694 






695 


001122 




696 


001122 


000020 



50 



n\w 



) 04 -APR-. 
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FWDSEQ 
ADDLSB 
RITEDA 
NEWOAT 
CURDAT 
FSTAOD 
LSTADD 
CURADD 
LOW ADD 
GOODAD 
TSTADD 
NEWADD 
SOFTER 
SOFTRE 



• WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



SEQ 0016 



{USED TO INDICATE DIRECTION OF ADDRESSING 

{STORES LEAST SIGNIFICANT BIT FOR RAM TESTS 

{STORES WRITE DATA FOR RAM TESTS 

iDATA STORE FOR RAM TESTS 

jDATA STORE FOR RAM TES1S 

I STORES FIRST ADDRESS IN ADDRESSING SEQUENCE 

l STORES LAST ADDRESS IN ADDRESSING SEQUENCE 

l STORES CURRENT ADDRESS FOR RAM TESTS 

j STORES LOW ADDRESS FOR RAM TESTS 

I STORES GOOD ADDRESS FOR RAM TESTS 

lADORESS STORE FOR RAM TESTS 

j ADDRESS STORE FOR RAM TEST 

{USED TO STORE SOFT ERROR COUNT 

jUSED TO HOLD RETRY ADDRESS ON SOFT ERRORS 



{•••••THIS IS IT. THE PROGRAM TEST LOCATION AND WRITE BUFFER! J !!!!!!* 1 •!!•!• • » 
T-STLQC: 

.BLKW dO 



E2 



U OBAi ARfr AS 
KDJ11A.MAC 



r>9; 

698 
6^9 
700 
701 
702 
705 
704 
70S 
706 
707 
708 
709 
710 
711 



MACU1 
05 -APR 84 



11*36 



712 
713 
714 
715 
716 
717 
718 
719 
720 
721 
722 
725 
724 

72:, 

726 
??7 
728 
729 
7 50 
/51 
7 52 
/33 
754 
735 
736 
757 



001162 
001170 
001176 
001204 
001212 
001220 
001224 
001232 
001240 
001246 
001254 
001262 
001270 
001276 
001304 
001312 
001520 
001525 
001552 
001540 
001346 
001552 
001560 
001566 
001374 
001402 
001403 
001410 



005015 
044502 
020075 
020122 
0S2U1 
0*42524 
005015 
044502 
020075 
020122 
020105 
047101 
020107 
040504 
046105 
044514 
051505 
015 
042510 
042524 
047522 
005015 
020122 
005015 
020122 
000 
015 
000 
001412 



042523 
020124 
020061 
034061 
051440 
000115 
042523 
020124 
020061 
040505 
040522 
020104 
040522 
040524 
040511 
054524 
051524 
041412 
051440 
020115 
000122 
051105 
02004 5 
051105 
041520 
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GLOBAL TEXT SECTION 



SEQ 0017 



020124 
020070 
04 7506 
041040 
051551 

020124 
020071 
04 7506 
044105 
020115 
040524 
020115 
051040 
044502 
052040 
000 
041501 
051531 
051105 

047522 
000075 
04 /522 

036440 



,SBTTL GLOBAL TEXT SECTION 



J ♦♦ 



i THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
{ MES5ACFS, AND ASCII INFORMATION THAT ARE USED IN 
; MORE THAN ONE TEST. 



FORMAT STATEMENTS USED IN PRINT CALLS 



0PMSG2; .ASCI/ <CRwLF>/SET BIT - 1 FOR 18 BIT SYSTEM/ 



0PMSG3: .ASCIZ <CR><LF>/SET BIT 9 - 1 FOR CACHE RAM AND TAG RAM DATA RELIABILITr TESTS/ 



ERRMSG: i .ASCI/ <CR»<LF>/CACHE SYSTEM ERROR/ 



ERR1: 
ERR2: 



020012 020040 iCRLF: 



ASCI/ < CH w i.r > /ERROR o */ 

ASCI/ <CR><LF>/ERROR PC ■>/ 

ASCIZ <CR-<LF>/ / 
EVEN 



1-1 

^?i^S!C ENTA ii%R. 8 4K^i 130A(105?) 04ftPR - 8 * 10:3fl Prt ^ 5 see 0005 

140 THE EQl LOWING ASSIGNMENTS HAVfc BEEN MADE FOR THE KDJ11-A 

141 DIAGNOSTIC SWITCH REGISTER BITS: 
l-*2 

145 EUT01S 14 15 12 11 10 9 8 

144 * *-.-.. .*...... .* + ...4, . --* *.-.....* 

14-> DON' T 18 BIT EXTENDED 

14b TEST ADDRESS CACHE 

14.* BEVENT ONLY TESTS 

148 * ■ - ♦ - - * ..-*..._...... * ...*....... 

150 DttAU.l SETTINGS ARE TO TEST 22 BIT ADDRESSES AND NOT DO THE 

151 EXTENDED CACHE TESTS. 



1 '. 



* •■ - - * ■ ■ + 



IS? PRIOR TO EXECUTING THE FIRST PASS OF THE DIAGNOSTIC THE OPERATOR 

l l >4 WILL BE DIRECTED TO SET THE SWITCH REGISTER TO INDICATE UHETHER 

155 THE KDJli-A WOER TEST IS IN A SYSTEM CONFIGURED FOR 18 OR 22 HI 

156 ADDRESSING ANO WHETHER CACHE RAH DATA RELIABILITY TESTS ARF fO OF 
IS.* EXECUTED. AN 18 BIT ADDRESS CONE IG, 'RAT ION SHOULD BE INDICATED V 
1S3 ANY 18 ADDRESS BIT ONLY MEMORY BOARDS RESIDE IN THE SYSTEM OR IF 
1S^ THE SYSTEM BACKPLANE DOES NOT SUPPORT 22 ADDRESS BITS. THt CACHE 

160 RAM DATA RELIABILTY TESTS REQUIRE APPROXIMATELY 3S MINUTES TO 

161 EXECUTE ANO SHOULD ONL < BE SELECTED IF PROBLEMS UITH CACHE DATA 

162 CORRUPTION OR RETENTION ARE SUSPECTED. 
103 

164 TO CHANGE THE SWITCH REGISTERS HALT THE PROGRAM AND RESTART IT 

165 AT 200 ANSWERING THE INITIAL QUESTIONS. 
166 

l*"' 2.3 OPERATION UNDER APT 
163 

1*"* OPERATION IN THE APT ENVIRONMENT REQUIRES SOME SPECIAL CONSIDERA 

1'0 TIONS DUE TO THE ASYNCHRONOUS HALTS Of THE DIAGNOSTIC BY THE APT 

I'l MONITOR. IF THE EFFECTS OF" THESE HALTS ARE NOT ANTICIPATED, FALSE 

1''- T.RRORS MAI BE REPORTED. THEREFORE, WHEN OPERATING IN THt APT ENVIRON 

1'* MENT THE FOLLOWING DIFFERENCES IN THE EXECUTION OF THE PROGRAM SHOULD 

1''4 BE NOTED: 
1 r, 

1 '>• :.. CERTAIN CACHE TESTS WHICH RELY ON THE INTEGRITY OF DATA IN THE 
1 ; ' HIT/MISS REGISTER OR THE WAY IN WHICH THE CACHE IS All OCATFD Wit' 

1/8 JL*1T TO A SoH-ROUTINt U AN ERROR IS ENCOUNTERED. THE SUBROUTIM 

1''* DETERMINES IF THE DIAGNOSTIC I. OPERATING IN APT ENVIRONMENT. U 

1 M ^ ! IT IS IN APT ENVIRONMENT IT Will. RETRY THE F All INK, TEST ONE TIME. 

1H 1 If THE TEST PASSES ON 1 HI' SECOND ATTEMPT THE f IRST ERROR Will BE 

1H «' CONSIDERED TO BE APT INDUCED. IE IT FAILS ON THE SECOND ATTEMPT 

* H * THE ERROR R0U1 INE WILL BE CALLED. 

184 

I* 1 ' 2.4 EXECUTION TIMES 

1 M -' A. THE LONGEST TEST 

* H ' 4 THE LONGEST TEST IS THt TAG RAM DATA Rt LIABILITY T| 'jT WHICH I *Kl S 

l l * v ' APP. OXTMAEL i ,'S MINi'TES ID E >.( CUTE . FOR THIS REASON "HE DATA Rt.llABIli.Ti 

l'*l TEST; ARE NORMAL 1 t DE SELECTED. 

I 1 *.' 

I'*'- \\. Fin I PAS', T I Mf 

; *4 

!^ THE TIME K(JR A FULL PASS WITH Tht OATA RELIABILITY TESlS Ut -SE.LECTLD 



ill 

KDJU^ 04 APR -84 10:58 PAGE 6 SfcQ0006 

l l> ^ IS APPROXIMATELY S SECONDS. WITH AL.l TESTS SELECTED A FULL PASS 

1^-' MKES ABOUT T,*> MINUTE f>. 

.■* l » 4.0 ERROR INFORMATION 

iW 

AM ERRORS WILL CAUSE 1 HL EOLLUWING E>MOR MESSAGE TO BE PRINTED} 

i "N > 

.V- CACHE SYSTEM ERRCR 

A>4 ERROR - CUNIQUL ERROR NUMBER) 



-OS ERROR PC - (PC AT TIME OE ERROR) 

.'0' THE ERROR WILL THEN BE REPORTED TO APT AND THE PROGRAM 

^08 Wilt HALT. 

..'10 4.0 PROGRESS REPORT 

■Ml 

*M^ AT THE END OF" tACH PASS THE DIAGNOSTIC NAME AND PASS COUNT ARE PRINTED. 

.M.< 

-M4 fi 

cMS 



GLOBAL ARl AS 
KD J HA. MAC 

V^ 

7<>4 
/OS 
796 
7^7 

»> 

800 
801 
80? 
805 
804 
80S 
806 
80- 
808 
80^ 
810 
811 
812 
813 
814 
8 IS 
816 
817 
818 
819 



MACU1 30M(10b2) 
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n<i 
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global Subroutines section 



SEQ 0020 



00155* 
001560 
001562 
001564 
001570 
001572 
001576 
001602 



012702 
005003 
010321 
062703 
077204 
012721 
012/11 
000207 



000006 



000200 

002000 
177600 



; FUNCTIONAL DESCRIPTION; 

; SUBROUTINE TO INITIALIZE ALL THE MMU PAGE ADDRESS REGISTERS (PANS). 

THIS ROUTINE WILL INITIALIZE 8 PARS STARTING AT A BASE ADDRESS 
i SUPPLIED BY THE CALLING ROUTINE. PARS 0-5 WILL BE MAPPED FROM 
I ADDRESS TO ADDRESS 137777 (0-24K). PAR 6 WILL BE hAPPED PROM 
j ADDRESS 200000 TO 217777 AND PAR 7 WILL BE MAPPED TO THE I/O 
{ PAGE. 

j INPUTS: 

5 Rl H'MTAINS THE BASH ADDRESS OF THE NEXT 8 PARS TO BE INITIALIZED 

: OUTPUTS: i^ONE 

i SUBORDINATE ROUTINES USED: NONE 

5 FUNCTIONAL SIDE EFFECTS: NONE 

j CALLING SEQUENCE: JSR PC.LDPARS 



LDPARS; 


MOV 


Ob, 


R2 




CLR 


R3 




l$i 


MOV 


R3, 


(Rl )» 




ADD 


0200, 


R3 




SOB 


R2. 


1$ 




MOV 


02000, 


(Rl). 




MOV 


01/7600 


• (Rl) 




RTS 


PC 





;LE T 1 OOP COUNTER COUNT 

I INITIALIZE INDEX VAl UE 

1 1 OAD PARS 

j INDEX IN 4K INCREMENTS 

{LOAD h IRST StX PARS 

j LET PAR6 MAP TO 200000 

t t FT PAR7 MAP TO I/O PAGE 

'.RETURN 



FIRST 6 PARS 



I'd 



GLOBAL 


AM AS 


MAC 111 


30A( 10S2) 


KDJ11A. 


MAC 03-APR-84 


11 : 36 


820 








821 








822 








823 








824 








a;>s 








826 








42? 








828 








82 c i 








830 








851 








8 32 








833 








834 








83S 








8 3b 








S3; 








838 








830 








840 








841 


001604 


01270? 


000006 


842 


001610 


01272* 


1 77406 


84 3 


001614 


077203 




844 


001616 


012721 


0/7406 


84 c . 


001622 


012711 


077406 


846 


00X626 


000207 
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GLOBAL SUBROUTINES SECTION 



SEQ 0021 



♦ ♦ 



FUNCTIONAL DESCRIPTION: 

SUBROUTINE TO INITIALIZE ALL THE MMU PAGE DECRIPTOR REGISTERS CPDRS) 
THIS ROUTINE WILL INITIALIZE 8 PDRS STARTING AT A BASE ADDRESS 
SUPPLIED B/ THE CALLING ROUTINE. PDRS 0*5 WILL BE INITIALIZED TO 
4K READ/WRITE BYPASS AND PDRS 6 AND 7 WILL BE INITIALIZED TO 
4I< READ/WRITE NC BYPASS. 

NOTE: THERE IS NO NEED TO BYPASS ON I/O PAGE REFERENCES BECAUSE 
THE CACHE DOES NUT ALLOCATE ANY OF THESE REFERENCES, 

INPUTS: 

Rl CONTAINS THE BASF. ADDRESS OF THE NEXT 8 PDRS TO BE INITIALIZED 

OUTPUTS: NONE 

SUBORDINATE ROUTINES USED: NONE 

FUNCTIONAL SIDE EFFECTS: NONE 



CALLING SEQUENCE 



JSR 



PCLDPARS 



l.DPORS: MOV 46, R2 

1$; MOV «177406,(R1)» 

SOB h^ ^ 15 

MOV #77406, CR1)» 

MOV #7/406, (Rl) 

RTS PC 



jLET LOOf COUNTER COUNT FIRST 6 PARS 



{LOAD PDRS WITH 
jLOAD FIRST SIX 
;LET PAR6 BE 4I< 
[LET PAR7 BE 4K 
{RETURN 



4K READ/WRITE BYPASS 

PDRS 

READ/WRITE NO BYPASS 

RtAD/WRITE NO BYPASS ALSO 



J 2 



LU.OHAi ARIAS 
KDJ11A.MAC 



84 7 
848 
849 
850 
851 
85? 
85? 

855 
856 
8 r >7 
858 
85'* 
860 
861 
86? 
86? 
864 
865 
866 
86/ 
868 
86^ 
8/0 
871 



MACU1 30A(10b2) 
03-APR-84 11; 3b 



001630 
001630 
00163? 
001634 



104000 
000001 
0013?5 
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GLOBAL SUBROUTINES SECTION 



} FUNCTIONAL DESCRIPT TOK: 

j SUBROUTINE TO HANDLE PARITY ERROR ABORTS FROM THE RAM STORE RAM TESTS, 

{ INPUTS: 

j MEMORY SYSTEM ERROR REGISTER CONTAINS BITS INDICATING FAILURE 

j OUTPUTS: NONE 

i SUBORDINATE ROUTINES USED: NONE 

j FUNCTIONAL SIDE EFFECTS: NONE 

CALLING SEQUENCE: CALLED BY PARITY ABORT 

MOV 301 14, SLOCOO i SAVE CONTENTS OF PARITY ABORT VECTOR 
MOV ODSPAR, 30114 {LET VECTOR POINT TO PARITY ABORT ROUTINE 



SEQ 0022 



(CACHE PARITY ERROR OCCURS) 



RAMPAR; 



001636 000002 



ERROR 
.UORD 
.WO.^D 

RTI 



1 
ERRMSG 



;ALL ERRORS TO TRAP TO EMT VECTOR 

; UNIQUE ERROR NUMBER 

; ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERRQP 
{RETURN 



K 1 



GLOBAL Art* AS 


MAC ill SO Al 1052) 


KD J 11 A. MAC 


03 AP^ 84 11:36 


36 / 


000030 


368 


000054 


369 


000060 


3 70 


000064 


371 


000240 


372 




373 




3 74 




375 




376 


000250 


37 7 




378 




3i'^ 




380 


1 .' /572 


381 


17/574 


38? 


17/5/6 


38? 


172516 


384 




385 




386 




7S/ 


177600 


3^8 


177602 


389 


177604 


390 


17 7606 


391 


177610 


392 


17 7612 


393 


1/7614 


394 


177616 


...9:. 




396 




39 7 




398 


1 7 /620 


W 


1/7622 


400 


17 7624 


401 


17/626 


402 


17/630 


403 


17/632 


404 


17/634 


405 


1/7636 


406 




40/ 




408 




4 OS 


1/7640 


410 


1/7642 


411 


17 7644 


41. 


17 7646 


41' 


1 / /650 


414 


1 7 /652 


415 


1 / /654 


4 16 


1/7656 


41 / 




418 




4 J. '■* 




420 


1 / /660 


421 


1//662 


422 


1 7 7664 
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BASIC DEFINITIONS 



SEQ 0010 



EMTVEC- 


30 


TRAPVEC ; 


•34 


TKVtC- 


60 


tpvec- 


64 


PIRQVEC 


-240 


.SBTTl. 


MEMORY 



j {EMULATOR TRAP (F.MT) **ERR0R** 
} I "TRAP" TRAP 
} jTIY KEYBOARD VECTOR 
; }TTY PRINTER VECTOR 
j {PROGRAM INTERRUPT REQUEST VECTOR 
MANAGEMENT DEFINITIONS 



j*KTll VECTOR ADDRESS 

MMVEC- 250 

l*KTU STATUS REGISTER ADDRESSES 



SRO- 


1775/2 




SR1- 


17 7574 




SR2- 


17 75 76 




SR3- 


172516 




j*USER 


"I" PAGE 


DESCRIPTOR REGISTERS 


UIPDRO" 


177600 




UIPDR1- 


177602 




UIPDR2- 


177604 




UIPDR3- 


1/7606 




UIPDR4- 


17/610 




UIPDR5- 


177612 




UIPDR6- 


177614 




U1PDR7- 


177616 




i*USER 


"D" PAGE 


DESCRIPTOR Rt.oISTORS 


UOPDRO- 


177620 




U0PDR1- 


177622 




U0PDR2- 


177624 




U0PDR3- 


17/626 




U0PDR4- 


177630 




U0PDR5- 


17/632 




U0PDR6- 


177634 




U0PDP7» 


177636 




j*USER 


"I" PAGE 


ADDRESS REGISTERS 


UIPARO- 


1/7640 




UIPAR1- 


17/642 




UIPAR2- 


17/644 




UIPAR3- 


17/646 




UIPAR4* 


17/650 




UIPAR5- 


17 7652 




UIPAR6- 


1//654 




UIPAR7- 


17 7656 




;*U5FR 


"D" PAGE 


ADDRESS REGISTERS 


UDPARO* 


1 / /660 




IJ0PAR1 * 


1 //662 




U0PAR2" 


17 7664 





GLOBAL AREAS 
KDJUA.NAC 



L.'l 



MACU1 30A( 1052) 
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MFMORY MANAGEMENT DEFINITIONS 



SEQ 0011 



4 c'.' 5 


17 7666 


424 


177670 


425 


17767? 


426 


1//6/4 


427 


177676 


428 




429 




4 50 




431 


1 .WOO 


4?? 


1 72202 


435 


1 72204 


4 34 


1 72206 


4 35 


172210 


4 36 


1/2212 


43/ 


1/2214 


•)3S 


172216 


43^ 




440 




441 




442 


172220 


44 3 


172222 


444 


172224 


44 r > 


1 72226 


446 


1/2230 


447 


1 ?2?.5J 


448 


172234 


449 


172236 


450 




451 




452 




453 


1 /2240 


4 54 


172242 


4 55 


172244 


456 


172246 


45/ 


172250 


4S8 


17^252 


459 


1 /2254 


460 


172256 


461 




462 




46 5 




464 


1 72260 


465 


1 72262 


4 66 


1 72264 


46/ 


172266 


468 


1 /22 /O 


469 


1722 72 


4/0 


1 722 /4 


4 71 


172276 


4/.' 




4 .'5 




4 74 




4/5 


1 /2300 


4 /6 


17230,' 


4// 


1 /2304 


4/8 


172306 



U0PAR3 
U0PAR4 
UDPAR5 
UDPAR6 
U0PAR7 



177666 
17 76/0 
17 7672 
177674 
177676 



j ♦SUPERVISOR "I" PAGE DESCRIPTOR REGISTERS 



SIPDRO- 
SIP0R1- 
SIPDR2- 
SIPDR3- 
SIPDR4- 
SIPDR5- 
SIPDR6- 
SIP0R7- 



172200 
172202 
172204 
172206 
172210 
172212 
172214 
172216 



^SUPERVISOR "D" PAGE DESCRIPTOR REGISTERS 



SDPDRO- 
SDPDR1- 
SCDR2" 
SDPDR3- 
SDPDR4- 
SDPDR5- 
SDPDR6- 
SDPDR7- 



172220 
172222 
172224 
172226 
172230 
172232 
172234 
172236 



{♦SUPERVISOR "I" PAGE ADDRESS REGISTERS 



SIPARO- 
5IPAR1- 
5IPAR2- 
SIPAR3- 
S1VAR4- 
SIPARS- 

SIPAhb* 
SIPAR7- 



172240 
172242 
172244 
172246 
172250 
i 72252 
172254 
172256 



♦SUPERVISOR "0" PAGE ADDRESS REGISTERS 



SDPARO 

SDPAR1 

SDPAR2 

SDPAR3 

SDPAR4 

SDPAR5^ 

SDPAR6 

SDPAR7 



172260 
172262 

172264 
172266 
172270 
172272 
1722/4 
172276 



{♦KFRNFl. "I" PAGE DESCRIPTOR REGISTERS 



KIPDHO- 

KIPDRl* 

KIPDM2- 
KIPDR3- 



1 /2300 
1 /2302 
1 /2 304 
1/2306 



Ml 



IU OBAi AW AS 


MAC 111 


30AC1052) 


K0J11A.MAC 


03 -APR -84 


11j36 


4/9 


172310 




480 


17231? 




481 


172314 




48? 


W2316 




483 






484 






485 






486 


17?3?0 




48.' 


172322 




488 


172324 




489 


172326 




490 


1 72330 




491 


17233? 




49? 


172334 




493 


172336 




494 






495 






496 






497 


172340 




498 


17234? 




499 


172344 




500 


172346 




501 


172350 




50? 


17235? 




503 


172354 




504 


172356 




505 






506 






50 V 






508 


1 72360 




509 


17236? 




510 


172364 




511 


172366 




51? 


172370 




513 


1723 7? 




514 


172374 




515 


172376 




516 






517 






518 


000000 




519 


000001 




5>0 


000002 




5?1 


000003 




5?? 


000004 




5? 3 


000005 




5? 4 


000006 




525 
5? t\ 


00000 / 




.Ml. KJ 

5?/ 


000244 




5?8 






5?9 






530 


177/46 




531 


1/7/44 




5 V 


1///5? 




5 :■ '. 


17776C 




554 







04 -APR -84 10:38 PAGE 1? 

MEMORY MANAGEMENT DEFINITIONS 



SEQ 0012 



KIPDR4- 


172310 


KIPDR5- 


17231? 


KIPDR6- 


172314 


KIP0R7- 


172516 


;*KERNEL "D" PA^ OESCRIP 


KDPDRO- 


172320 


K0PDR1- 


172322 


KDPDR2- 


172324 


KDPDR3- 


172326 


KDPDR4- 


172330 


KDPDR5- 


172332 


KDPDR6- 


172334 


KDPDR7- 


172336 


s+KERNEL "I" PAGE ADDRESS 


KIPARO* 


172340 


KIPAR1- 


172342 


KIPAR2- 


172344 


KIPAR3- 


172346 


KIPAR4- 


172350 


KIPAR5- 


172352 


KIPAR6- 


172354 


KIPAR7- 


172356 


i*KERNEL "0" PAGE ADDRESS 


KDPARO- 


172360 


KDPAR1- 


17236? 


KDPAR2- 


172364 


KDPAR3- 


172366 


KDPAR4- 


172370 


KDPAR5- 


172372 


KDPAR6- 


1 72374 


KDPAR7- 


172376 


{THESE 


ARE FLOATING POINT 


ACO* 


*0 


AC1- 


*1 


AC2- 


*? 


AC3- 


#3 


AC4- 


*4 


AC5- 


*5 


AC6- 


*6 


AC 7 


*7 


FPVEC 


244 


; THESE 


ARE CACHE REGISTER 


CCR- 


1 7/746 


MSt H * 


1 77744 


HUM1S* 


1 ///'..' 


CPEHCG- 


17 7 76n 



REGISTERS 



ACCUMULATOR EQUATES 



EQUATES 

(CACHE CONTROL REGISTER 
MtMQRT 5Y:irtM [RROR REGISTER 
HI [/MISS HKilSTl R 
CPU ERROR REGISTER 



GLOBAL AM-' AS 
K0J11A.MAC 

535 

536 
53/ 
538 

539 

r>u 

542 

54? 
544 
54 5 
546 
54/ 
548 
549 
550 
551 
552 
55? 
554 
555 
556 



558 
559 
560 

561 

562 

563 

564 
565 
566 
56/ 
568 
56 a 
5~u 
6/1 
572 
575 
574 
575 
5/6 
5/7 
578 
5/9 
580 
1 >8 1 

682 

58 4 
584 
585 
586 
56/ 
588 
58'* 
590 



MAO 11 30AC1052) 
03-APR-84 11:36 



17 7546 
177560 
177562 
177564 
177566 
000000 
000001 
000001 
002000 



001000 
000000 



Nl 



04 -APR 84 10:38 PAGE 13 

MEMORY MANAGEMENT DEF INT T IONS 



SEQ 0013 



000000 
000002 

000004 

000006 

0001/4 
0001/6 



000046 
000052 



000000 



cooooo 

000737 

001716 

000340 
000174 
000000 
OOOOOO 



000200 000137 001716 



000204 
000046 
011034 
000052 
OOOOOO 
000204 



{MISCELLANEOUS DEFINITIONS 



BEVENT* 

RC5R* 

KilUK" 

XCSR- 

XBUF- 

ERRTN- 

$TSTNU-1 

ERRNUM- 1 

ASWREG- 2000 



177546 
17 7560 
17 75o2 
177564 
17 7566 
HALT 



sBEVENT CONTROL REGISTER 



i INITIALIZE ERROR NUMBER COUNTPR 
:SWP FOR APT --NO BEVENT TESTING 



jTHIS EQUATE DEFINES T HE BOTTOM OF THE PROGRAM STACK POINTER 

STBOT- 1000 
.ASECT 
.SBTTL TRAP CATCHER 

. «0 
♦ALL UNUSED LOCATIONS OF THE VECTOR AREA CONTAIN 

♦ A ".*2, IOT" SEQUENCE TO CATCH ANO PROCESS ILLEGAL 

♦ TRAPS AND INTERRUPTS THAT MIGHT OCCUR. 

♦THE IOT TRAP WHICH IS TAKEN ON THE ILLEGAL TRAP/INT 

♦ TRAPS TO THE: JSCOPE ROUTINE WHICH (IF THE. RETURN PC IS 
♦LESS THAN 1002) JUMPS TO THE SERROR ROUTINE. 

♦THE SERROR ROUTINE WILL REPORT THE ERROR AS FOLLOWS : 

♦ PC»YYYYYY UNEXPECTED TRAP TO XXX 
♦AND RETURN TO THE PROGRAM AT PC'rrrYYY.2 
♦WHERE XXX-LOCATION OF H l.EGAl TRAP 

♦ YYYYYY*PC AT TIME OF TRAP 

♦ NOTE: IF THE. PROCESSOR IS NOT AN 11/05 THE PROGRAM 

♦ CAN BE STARTED AT ADDRESS AS WELL AS ADDRESS 200. 



S40CAT 



HALT 

BR 



, WORD 

.WORD 

. » 1 /4 

DISPRLGj .WORD 

SWREG. .WORD 

.SBTTl 



. 100 

START 

340 



j ; HAL T 

SiBRANCH TO 17 7"'0O f. TIME OUT (NUT ON 

Sill -'05 t 

{ ; V E C T OR I i) :, TART I Nl \ ADOR E ' \ , 

j jWITh PRIORITr LEVEI / 



;; SOFTWARE DISPlAi REGIS UR 

j i SOFTWARE SWITCH REGISTER 

STARTING ADDRESU5) 

.yMP eJSSTART !} G0 TO START Of PROGRAM 
.SBTTL ACTU HOOKS 



j HOOKS REQUIRED Bt ACTU 

CiAVf PC 



rlTTt 



JSVPC . 
. 46 
I END AD 

. -V 

. WORD 

. -iSVPC 

APT PAR AM* Tf-H \]\ oc« 



jjl^SET L0C.4r» U ADD'hI v., i> SENDAp IN ,itOP 



2 ' .E f ! 0C.52 T ZERO 
RE ST ORE PC 



iStl LOCATIONS 24 AND 44 AS REQUIRED *- OR APT 



.1 "» 

-JC. 



GLOBAL 


ARf AS 


MACU1 50A(1052) 


KDJ11A. 


MAC 03-APR-84 11*36 


fW 






5*2 




000204 


5^5 




000024 


5*4 


000024 


000200 


5*^ 




000044 


5*6 


000044 


000204 


5** 




000204 


5*8 






S^Q 






600 






601 






o02 


000204 




603 


000204 


000000 


t>04 


000206 


001000 


60S 


000210 


000001 


o06 


000212 


000004 


60 ? 


0C0214 


000000 


608 


000216 


000014 


*o* 




000204 


blO 




000002 


611 


00000,? 


000000 


61c? 


000004 


000006 


61? 


000006 


000004 


614 




000204 


61b 




001000 



04 APR 84 10:38 PAGE 14 
APT PARAMFTER BLOCK 



SEQ 0014 



I | *******«********+*+*****«+****+********************+***+++ ***** 

I SAVE CURRENT LOCATION 

I SET POWER FAIL TO POINT TO START OF PROGRAM 
jFOR APT START UP 

iPOINT TO APT INDIRECT ADDRESS PNTR, 
iPOINT TO APT HEADER BLOCK 
.-.♦a nRESET LOCATION COUNTER 

IJ*************************************************************** 

, SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
» INTERFACE SPEC. 



.IX-. , 


. -24 , 


200 i 


. -44 | 


IAPTHOR i 


.-.♦X i 



IAPTHD 

IHIBTS 

iMBADR 

$T5TMj 

tPASTM: 

IUNITM: 

. -.sx 

.•2 



6 

4 

. -. IX 

»»1Q00 



.WORD 
.WORD 
.WORD 

.WORD 
.WORD 
.WORD 





IMAIL 
1 
4 
O 



I TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
t ADDRESS OT APT MAILBOX (BITS 0-15) 
{RIM TIM OF LONGEST TFST 
jRUN TIME IN SECS. OF IS! PAS' 



ON 1 
I ADDITIONAL RUN TIME (SF.CS) OF A PAS 
*ETEND-tMAILV2 t i LENGTH MAILBOX -ETADLEC WORDS) 
jSAVE CURRENT LOCATION COUNT 



l SET UP SOME VECTORS 
jRESTQRE LOCATION COUNT 



UNI T (QUICK VtRIFr ; 
dS FOR EAQH ADDITIONAL UNIT 



CO 



Gl OBAi 


AMI AS 


MAC 111 


KDJL1A. 


MAC 03 APR -5 


6 lb 






M .' 






618 






61^ 






600 






601 






t>00 






*05 






604 






60b 






606 


001000 




o07 


001000 


000000 


608 


001000 


oooooo 


609 


001004 


000000 


6 30 


001006 


oooooo 


o3i 


001010 


oooooo 


630 


001010 


oooooo 


635 


001014 


oooooo 


6 34 


001016 


oooooo 


635 


001000 




636 


001000 


000 


637 


001001 


000 


638 


001000 


oooooo 


639 


001004 


oooooo 


640 


001006 


oooooo 


641 






64^ 






64 3 






644 






645 






646 






64 7 


001030 




648 






649 






650 






651 






650 






653 


001030 


oooooo 


o54 


001030 


oooooo 


655 






656 






65 7 


001034 


oooooo 


658 


001036 


oooooo 


659 


001040 


oooooo 


660 


001040 


oooooo 


661 


001044 


oooooo 


660 


001046 


17757C 


663 


001050 


177570 


664 


001050 


oooooo 


665 






666 


001054 


oooooo 


66 / 


001056 


oooooo 


♦>6.i 


001060 


oooooo 


669 


001060 


oooooo 


*i 70 


001064 


oooooo 



r* 1 04 apr q 8 w°62?a gfcti 

.SBTTL GLOBAL OATA SEC1I0N 

I THE GLOBAL DATA SECTION CONTAINS OATA THAT ARE USED 
i IN itORE THAN ONE TEST. 

, SBTTL APT MAILBOX -ETABLE 



SEU 0015 



j { ****** 

.EVEN 

$MAIL: 

IMSGTY: 

IFATAL: 

tTESTN: 

*PASS: 

$DEVCT t 

*UNIT; 

tMSGAD: 

IMSGLG; 

$ETABLE: 

IENV: 

iENVM; 

ISWREG: 

IUSWR: 
JCPU0P* 

{ 

J 

J 
J 



tETENO 

.MEXIT 



♦********************************+*+*+********* + *** #+ ** t+ 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

.BYTE 
.BYTE 
.WORD 
.WORD 
.WORD 



AMSGTY 

AFATAL 

ATESTN 

APASS 

ADEVCT 

AUNIT 

AMSGAD 

AMSGLG 

AENV 

AENVM 

ASWREG 

AUSWR 

ACPUOP 



|APT MAILBOX 

iMESSAGE TYPE CODE 

I FATAL ERROR NUMBER 

i TEST NUMBER 

|PA5S COUNT 

iDEVICE COUNT 

l I/O UNIT NUMBER 

iMESSAGE AOORESS 

: MESSAGE LENGTH 

l APT ENVIRONMENT TABLE 

lENVIRONMENT BYTE 

jENVIRONMENT MODE BITS 

lAPT SWITCH REGISTER 

jUSER SWITCHES 

I CPU TYPE .OPTIONS 
BITS 15-11-CPU TYPE 

11/04-01, 1 1/05-00, 11/00-03 ,11/40*04, U /45«05 
11/70-06, PDQ-07.U-10 
BIT 10-REAL TIME CLOCK 
BIT 9-FLOATING POINT PROCESSOR 
BIT 8 -MEMORY MANAGEMENT 



t THESE LOCATIONS ARE USED IN MORE THAN ONt TEST TO STORE VECTOR DATA 
I WHEN THE TEST NEEDS TO HAVE AN ERROR CONDITION RESPOND DIFFERENTLY 
jFROM THE DEFAULT RE SPONGE* 
SLOCOO: .WORD 
SL0C01: .WORD 

IN MORE THAN ONE TEST TO STORE WORKING DATA. 

I STORES EXPECTED i. GOOO ) OATA FOR COMPARISONS 

iSTORES RECIEVEO DATA TO BE VERU ItD 

jERROR INDICATOR FOR FLOATING POINT TESTS 

lUSEO TO STORE "HAG" CONDITIONS 

i STORAGE FOR ERROR COUNT 

i STORAGE FOR SWITCH REGISTER ADDRESS 

j STORAGE FOR DISPLAY REGISTER ADDRESS 

i ERROR M AG 

BY MORE Tn/.N ONE TEST AS LOOP COUNTERS 



iSTORAGE FOR UNEXPECTED TRAP DATA 



671 



•THESE LOCATION 


S ARE USED 


EXPDAT: .WORD 





RECDAT: .WORD 





COUNT: .WORD 





FLAG: .WORD 





ERRCNT: .WORD 





SWRj .WORD 


DSUH 


DISPLAY: .WORD 


DDISP 


IERFLG: .WORD 





iTHESF LOCATIONS ARE U'JED 


DCOUNTj .WORD 





ALLCTR: .WORD 





LOOP IN: .WORD 





SAVSP1: .WORD 





SAVSPOt .WORD 


Q 



GLORAl AREAS 
KDJllA.MAC 



05 



n mi 



50 



M l ,i8 M) 



04- APR- 



aPI mMJAx mU b 



D2 



SEQ 0016 



6 73 
675 
674 
675 
676 
677 
67$ 
6 79 
68C 
681 
682 
r»85 
684 
685 
686 
68'* 
688 
689 
690 
691 
692 
695 
694 
695 
696 



001066 
001070 
001072 
001074 

001076 
001100 

001102 
001104 
001106 
001110 
001112 
001114 
001116 
001120 



000000 
000000 
000000 
000000 
000000 
000000 
000000 

oooooc 

000000 

000000 
000000 
000000 
000000 
000000 



FWDSEQ 
ADDLSB 
RITEDM 
NEWDAT 
CURDAT 
FSTAOD 
LSTADD 
CURADD 
LOWAOD 
GOOOAO 
TSTADD 
NEWADD 
SOFTER 
SOFTRE 



■ WORD 
. WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 




















USED TO INDICATE DIRECTION OF ADDRESSING 

STORES LEAST SIGNIFICANT BIT FOR RAM TESTS 

STORES WRITE DATA FOR RAM TESTS 

DATA STORE FOR RAM TESTS 

DATA STORE FOR RAM TESTS 

STORES FIRST ADDRESS IN ADDRESSING SEQUENCE 

STORES LAST ADDRESS IN ADDRESSING SEQUENCE 

STORES CURRENT ADDRESS FOR RAM TESTS 

STORES LOW ADDRESS FOR RAM TESTS 

STORES GOOD ADDRESS FOR RAM TESTS 

ADDRESS STORE FOR RAM TESTS 

ADDRESS STORE FOR RAM TEST 

USED TO STORE SOFT ERROR COUNT 

USED TO HOLD RETRY ADDRESS ON SOFT ERRORS 



001122 

00112a 



000020 



i«»!!!THlS IS IT. THE PROGRAM TEST LOCATION AND WRITE BUFFER* ! ? • ! • • » ! ! * ! • » • • J • 
TSTLQCt 

.BLKW ^0 



H2 



u.ORAi t\m as 

KDJ11A.MAC 



r>9; 
698 
6^9 
700 
701 
702 
70? 
704 
705 
706 
707 
706 
709 
710 
711 



MACU1 
03 -APR 84 



11:36 



712 

71? 
714 
715 
716 
717 
718 
719 
720 
721 
722 
723 
724 

72:, 

726 
??? 
728 
7?9 
730 
/SI 
7 32 
733 
734 
7 35 
736 
737 



001162 
001170 
001176 
001204 
001212 
001220 
001224 
001232 
001240 
001246 
001254 
001262 
001270 
001276 
001304 
001312 
001320 
001325 
001332 
001340 
001346 
001352 
001360 
001366 
001374 
001402 
001403 
001410 



005015 
044502 
020075 
020122 
052111 
0*2524 
005015 
044502 
020075 
020122 
020105 
04 7101 
020107 
040504 
046105 
044514 
051505 
015 
042510 
042524 
047522 
005015 
C20122 
005015 
020122 
000 
015 
000 
001412 



042523 
020124 
020061 
034061 
051440 
000115 
042523 
020124 
020061 
040503 
040522 
020104 
040522 
040524 
040511 
054524 
051524 
041412 
051440 
020115 
000122 
051105 
02004 3 
051105 
041520 

020012 



04 -APR 84 10; 38 PAGE 17 
GLOBAL TEXT SECTION 



SEQ 0017 



.SBTTL GLOBAL TEXT SECTION 



i ♦ ♦ 



i THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
t MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
s MORE THAN ONE TEST. 



FORMAT STATEMENTS USED IN PRINT CALLS 



020124 0PMSG2: .ASCI/ <CR><l.F>/SET BIT - 1 FOR 18 BIT SYSTEM/ 

020070 

04 7506 

041040 

051531 

020124 0PMSG3s .ASCIZ <CR><LF>/SET BIT 9 - 1 FOR CACHE RAM AND TAG RAM DATA RELIABILITY TESTS/ 
020071 
047506 
044103 
020115 
040524 
020115 
051040 
044502 
052040 
000 
041501 ERRMSG: : .ASCI/ <CR><LF> /CACHE SYSTEM ERROR/ 
051531 
051105 



047522 ERR1: 
000075 
04/522 ERR2: 

036440 



.ASCI/ <CRwi r >/f.RROR */ 
.ASCI/ <CR><LF> /ERROR PC ■-/ 



020040 $CRl.F : .ASCI 7 <CR><LF>/ 

.EVEN 



/ 



Gl OBAi ARE ;\'j 
KO J HA. MAC 

740 
741 
74 ?. 

744 



r> 



MAC 11 50AU052) 
03 -APR -84 11 {36 



04 -APR A4 10:39 PAGE 18 

GLOOAL ERROR REPORT SECTION 



SEQ 0016 



.SBTTL GLOBAL ERROR REPORT SECTION 



♦ ♦ 



i 'HE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 
{ USED BY MORE THAN TEST TU OUTPUT ADDITIONAL ERROR INFORMATION. 



G2 



GLOBAL ARIAS 



MAC ill 30AQ052) 



KDJ11A. 


MAC 05 -APR -84 


11:36 


745 








746 








74 7 








748 








749 








750 








751 








7V 








753 








754 








755 








75b 








7s; 








758 








754 








VhO 








761 








76;? 








765 








764 








76b 








766 








76/ 


001412 


012701 


172240 


768 


001416 


004767 


000152 


769 


001422 


012701 


172260 


7 70 


001426 


004 767 


000122 


7/1 


001452 


012701 


172340 


77,? 


001456 


004 76/ 


000112 


ni 


001442 


012701 


172360 


7 74 


001446 


004 767 


000102 


775 


001452 


012701 


177640 


7 76 


001456 


004767 


000072 


777 


001462 


012701 


177660 


7 78 


001466 


004 767 


000062 


7 74 


0014 72 


012701 


177600 


780 


0014 76 


004767 


000102 


781 


001502 


012701 


17 7620 


78c 1 


001506 


004 76 7 


0000 72 


785 


001512 


012701 


172300 


784 


001516 


004 767 


000062 


785 


001522 


012701 


172320 


786 


001526 


004 76 7 


000052 


78 7 


001552 


012701 


1 72200 


788 


001556 


004 76 7 


000042 


784 


001542 


012701 


t 72220 


740 


001546 


004 76 7 


000032 


791 


001i>52 


O002Q7 





04 -APR -84 10:31 



' — s^x-X PA G E }9 

GLOBAL SUBROUTINES SECTION 

>SBTTL GLOBAL SUBROUTINES SECTION 

i ♦ ♦ 

; THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 

; THAT ARE USED IN MORE THAN ONE TEST. 

I - - 

; ♦ ♦ 

; FUNCTIONAL DESCRIPTION: 

i SUBROUTINE TO INITIALIZE ALL THE MMU REGISTERS 



INPUTS: NONE 

OUTPUTS: NONE 

SUBORDINATE ROUTINES USED: LOAD PARS 

LOAD PDRS 



SEQ 0019 



j FUNCTIONAL SIDE EFFECTS: NONE 
j CALLING SEQUENCE: JSR 



INITMM: MOV 
JSR 

MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
RTS 



0172240, Rl 

PC, l.DPARS 

0172260, Rl 

PC, l.DPARS 

0172340, Rl 

PC, LDPARS 

0172360, Rl 

PC LDPARS 

0177640, Rl 

PC, LDPARS 

0177660, Rl 

PC, LDPARS 

0177600, Rl 

PC, LDPDRS 

O177620.R1 

PC, LDPDRS 

01 72 300 ,R1 

PC, LDPDRS 

n 72320. Rl 

PC, I DPDRS 

01 72200, HI 

PC, I DPDRS 

01/222Q t Hl 

PC, LDPDRS 

PC 



PC, INITMM 

BASE ADDRESS OF 
BASE ADDRESS OF 
BAfv. ADDRESS OK 
BASE ADDRESS OF 
jRASF ADDRESS UK 



I BASE AUDRE 

{BASE ADDRE 



^) v i 



or 

Of 



>:j OF 
.»■» OF 



{BASE ADDRESS OF 
{BASE ADDRE t:t: 
j BASE ADORES 1 
j BASE ADDRE !iS OF 
I BASF ADDRESS UF 
iRfcTURN 



SIPARS 
SDPARS 
KIPARS 
KDPMRS 
UIPARS 
UOPARS 
UIPDRS 
UOPDHS 
K I PDRS 
KDPDRS 
SI PDRS 
SOPORS 



I lei 



GLOBAL ARl AS 
KOJ11A.MAC 

MJ 

MS 

7*V.' 

/\*8 

800 
801 
80? 
803 
804 
80S 
806 
80.' 
808 
HO*J 
810 
811 
81? 
813 
814 
615 
816 
817 
818 
819 



MACU1 30AC10S2) 
03 -APR -84 11 :3b 
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GLOBAL SUf 



PAQE 20 



00155* 
001560 
00156? 
001564 
001570 
00157? 
001576 

001602 



01270? 
005003 
0103?1 
062703 
077204 
012721 
012/11 
000207 



000006 



000200 

002000 
177600 



"i 



ROUTINES SECTION 



SEQ 0020 



FUNCTIONAL DESCRIPTION: 

SUBROUTINE TO INITIALIZE ALL 



THE MMU PAGE ADDRESS REGISTERS (PARS) 



THIS ROUTINE WILL INITIALIZE 8 PARS STARTING AT A BASE ADDRESS 
SUPPLIED BY THE CALLING ROUTINE. PARS 0-5 WILL BE MAPPED FROM 
ADDRESS TO ADDRESS 13777/ (0-24IO. PAR 6 WILL BE hnPPED f- ROM 
ADDRESS 200000 TO 217777 AND PAR 7 WILL BE MAPPED TO THE I/O 
PAGE. 

INPUTS: 

Rl C'MTAINS THE BASE ADDRESS OF THE NEXT 8 PARS TO BE INITIALIZED 

OUTPUTS: NONE 

SUBORDINATE ROUTINES USED: NONE 

FUNCTIONAL SIDE EFFECTS: NONE 



CALLING SEQUENCE: 



LDPARS; MOV 
CLR 

1*1 MOV 
ADD 
SOB 
MOV 
MOV 
RTS 



06, 

R3 

R3, 

0200, 

R2. 

02000. 

«1 77600. (Ri) 

PC 



JSR 

R? 

(Rl )♦ 
R3 

n 

CR1)» 



PC, LDPARS 



iLET i OOP COUNTER COUNT FIRST 6 PARS 

j INITIALIZE INDEX VALUE 

;L OAD PARS 

I INDEX IN 4K INCREMENTS 

tl.UAD h IRST SIX EARS 

j LET PAR6 MAP TO 200000 

jlET PAR/ MAP TO I/O PAGE 

i RE TURN 



12 



GLOBAL 


ARt AS 


HACU1 


30AC10S2) 


KOJ11A. 


MAC 03 -APR -84 


11:36 


820 








821 








8cV 








823 








824 








82S 








826 








027 








828 








829 








830 








851 








832 








83? 








834 








85r> 








8 3b 








S3; 








838 








839 








840 








841 


001604 


01270? 


000006 


842 


001610 


01272'. 


! 77406 


84 3 


001614 


077203 




844 


001616 


012721 


0/7406 


84 r . 


001622 


012711 


077406 


846 


001626 


000207 
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GLOBAL SUBROUTINES SECTION 

FUNCTIONAL DESCRIPTION: 

SUBROUTINE TO INITIALIZE ALL THE MMU PAGE DECRIPTOR REGISTERS (PDRS) 
THIS ROUTINE WILL INITIALIZE 8 PDRS STARTING AT A BASE ADDRESS 
SUPPLIED Bf THE CALLING ROUTINE, PDRS 0-5 WILL BE INITIALIZED TO 
4I< READ/WRITE BYPASS AND PDRS 6 AND 7 WILL BE INITIALIZED TO 
4I< READ/WRITE NC BYPASS. 

NOTE: THERE IS NO NEED TO BYPASS ON I/O PAGE REFERENCES BECAUSE 
THE CACHE DOES NOT ALLOCATE ANY OF THESE REFERENCES. 

i INPUTS: 

i Rl CONTAINS THE BASE ADDRESS OF THE NEXT 8 PDRS TO BE INITIALIZED 



SEQ 0021 



; OUTPUTS: NONE 

; SUBORDINATE ROUTINES USED: NONE 

j FUNCTIONAL SIDE EFFECTS: NONE 



; CALLING SEQUENCE: 


JSR 


PC 


LUPARS 




l.DPDRS: MOV 


#6, 


R? 




jLET LOOF COUNTER COUNT FIRST 


6 PARS 


1$; MOV 


#177406 


,(R1)» 




{LOAD PDRS WITH 4K READ/WRITE 


BYPASS 


SOB 


R2. 


1$ 




{LOAD FIRST SIX PDRS 




MOV 


#7 7406, 


(Rl )♦ 




;LET PAR6 BE 4K READ/WRITE NO 


BYPASS 


MOV 


#7 7406, 


(Rl) 




jLET PAR7 BE 4K READ/WRITE NO 


BYPASS 


RTS 


PC 






{RETURN 





ALSO 



J2 



U.OBAi AMI' AS 

KOJ11A.MAC 



84 7 

848 
849 
8 SO 
8M 
8SJ 
85? 

85S 
856 

8S7 
8S8 
85'-> 
860 
861 
8b, 5 
86? 
864 
86S 
866 
86/ 
868 
869 
8/0 
871 



MAC 111 30AC10W) 
03-APR-84 11*36 



001630 

001630 104000 

00163? 000001 

001634 0013?S 

001636 QQQQQ2 
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GLOBAL SUBROUTINES SECTION 

; ♦ ♦ 

} FUNCTIONAL DESCRIPTION: 

j SUBROUTINE TO HANDLE PARITY ERROR ABORTS FROM THE RAM STORF RAM TESTS, 

j INPUTS: 

j MEMORY SYSTEM ERROR REGISTER CONTAINS BITS INDICATING FAILURE 

; OUTPUTS: NONE 

j SUBORDINATE ROUTINES USED: NONE 

j FUNCTIONAL. SIDE EFFECTS: NONE 

; CALLING SEQUENCE: CALLED BY PARITY ABORT 

; MOV 30114, SLOCOO j SAVE CONTENTS OF PARITY ABORT VECTOR 

j MOV 4DSPAR, 8*114 {LET VECTOR POINT TO PARITY ABORT ROUTINE 



SfcQ 0022 



(CACHE PARITY ERROR OCCURS) 



RAMPAR ; 



ERROR 
.WORD 
. W0.1D 

RTI 



ERRMSG 



;ALL ERRORS TO TRAP TO EMT VECTOR 
s UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGF 

{CACHE SYSTEM ERROR 
{RETURN 



K 



2 



GLOBAL 


ARK AS 


MACU1 


30AC1052) 


KDJ11A, 


MAC 03 -APR -84 


1U36 


8/2 








873 








874 








875 








876 








877 








8 78 








879 








880 








881 








88? 








88? 








884 








885 








8:u, 








8i*.' 








888 








889 








890 








891 








892 








893 








894 








895 








8^6 


001640 


122767 


000001 


897 


001646 


001022 




898 


001650 


005767 


177242 


899 


001654 


001017 




900 


001656 


062706 


000002 


901 


001662 


005267 


177230 


902 


001666 


005037 


177744 


903 


001672 


005037 


177572 


904 


001676 


005037 


177766 


905 


001702 


012737 


000400 


90b 


001710 


000177 


177204 


907 


001714 


000207 




908 
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GLOBAL SUBROUTINES SECTION 



SED 00^3 



! 



FUNCTIONAL DESCRIPTION 

SUBROUTINE TO HANDLE SOFT ERRORS THAT MAY BE CAUSED Br 
APT SYSTEM MONITORING DURING THE CACHE TEST, FOR EXAMPLE: 
IF A TEST IS USING THE HIT/MISS REGISTER TO MONITOR CACHE 
ACTIVITY, AND APT BREAKS IN, THE HIT/MISS REGISTER WILL BE 
MODIFIED. WHEN THE TEST RESUMES, A FALSE ERROR MAY BE CAUSED \\< 
THE CORRUPTED HIT/MISS REGISTER. LIKEWISE, A TEST MAY INITIALIZE. 
CACHE TO A KNOWN STATE ( Al. LOCATED/NOT ALLOCATED )i AN APT 
BREAK MAY CAUSE CACHE STATE TO ALTER AND THE TEST TO FAIL. 



; INPUTS 



SOFTRE CONTAINS RETURN ADDRESS TO BEGINNING OF TEST »4 TO 
TEST AGAIN ON ERROR 



! OUTPUTS: NONE 

-.SUBORDINATE ROUTINES USED: NONE 

{FUNCTIONAL SIDE EFFECTS: NONE 



; CALL INC SEQUENCE: 



JSR 



PC.APTSFT 



177152 APTSFT 



177746 



1* 



CMPB OAPTENV.SENV 

BNE 1$ 

TfiT SOFTER 

BNE 1$ 

ADD 02, R6 

INC SOFTER 

Cl.R 30MSER 

CLR 30SR0 

CLR atfCPEREG 

MOV 0eiT08,oWCCR 

JMP aSQFTRE 

RTS PC 



APT MODE 
OCCURRED? 



{ARE WE IN APT MODE? 

{NO SOFT ERRORS If NOT IN 

j HAS A SOFT ERROR ALREADY 

l IF YES GO TO ERROR 

{CLEAN UP THE STACK TO RETRY FES. 

{INCREMENT THE SOFT ERROR COUNTER 

CLEAR THE MSER 

TURN OFF MMU 

CLEAR THE CPU ERROR REGISTER 

FLUSH THE CACHE, CLEAR THE CCR 

RLTR1 TEST 

Gu IQ ERROR. ERROR OCCURRED MORE 

THAN ONCE OR NOT IN APT MODE, 



L2 



GLOBAL 


ARC AS 


MACU1 


30AC1052) 04- APR 84 10 


:38 PAGE 24 




KDJ11A. 


MAC 03-APR-84 


11:36 




GLOBAL 


SUBROUTINES SECTION 




909 


001716 








START: 








910 


001716 


012737 


000014 


177746 




MOV 


014.80CCR 


iSET CACHE TO FORCE MISS 


911 










.SBTTL 


INITIALIZE THE COMMON TAGS 


912 


001724 


012706 


001000 






MOV 


OSTACK.SP 


j l SETUP THE STACK POINTER 


913 










II INITIALIZE A 


FEW VECTORS 




914 


001730 


012737 


013314 


000030 




MOV 


TERROR, 80EMTVEC i iEMT VECTOR FOR ERROR ROUTINE 


915 


001736 


012737 


000340 


000032 




MOV 


*340,a#EMTVEC*2 


i i LEVEL 7 


916 


001744 


012737 


012766 


000034 




MOV 


O$TRAP,Q0TRAPVEC j j TRAP VECTOR FOR TRAP CALLS 


91? 


001752 


012737 


000340 


000036 




MOV 


*340,S*TRAPVEC* 


2>LEVEL 7 


918 


001760 


005067 


177022 






CLR 


♦ PASS 


i jCLEAR THE PASS COUNT 


919 


001764 


016767 


007012 


007002 




MOV 


$ENDCT,$EOPCT 


jj SETUP END OF -PROGRAM COUNTER 


920 


001772 


105067 


177054 






CLRB 


$ERFLG 


j j CLEAR THE ERROR FLAG 


921 










5 sSI/E 


FOR A HARDWARE SWITCH RE 


GISTER. IF NOT FOUND OR IT IS 


922 










, i EQUAL 


TO A »- 


l'\ SETUP FOR A 


SOFTWARE SWITCH REGISTER. 


923 


001776 


013746 


000004 






MOV 


Q0ERRVEC, -CSP) 


j j SAVE ERROR VECTOR 


924 


002002 


012737 


002036 


000004 




MOV 


*64$,Q*ERRVEC 


I i SET UP ERROR VECTOR 


925 


002010 


012767 


177570 


177030 




MOV 


0DSW2 # SWR 


II SETUP FOR A HARDWARE SWICH REGISTER 


926 


002016 


012767 


177570 


17 7024 




MOV 


0DDIS°, DISPLAY 


5jAND A HARDWARE DISPLAY REGISTER 


927 


002024 


022777 


177777 


177014 




CMP 


#-l,8SWR 


II TRY TO REFERENCE HARDWARE 5WR 


928 


002032 


001012 








BNE 


66$ 


j;BRANCH IF NO TIMEOUT TRAP OCCURRED 


929 
















II AND THE HARDWARE SWR IS NOT * -1 


930 


002034 


000403 








BR 


65$ 


j j BRANCH IF NO TIMEOUT 


931 


002036 


012716 


002044 




64$: 


MOV 


065$, CSP) 


iiSFT UP FOR TRAP RETURN 


932 


002042 


000002 








RTI 






933 


002044 


012767 


000176 


1767 74 


65$: 


MOV 


0SWREG.SWR 


;: POINT TO SOFTWARE SWR 


934 


002052 


012767 


000174 


176770 




MOV 


ODISPREG, DISPLAY 


935 
936 


002060 


012637 


000004 




66$: 


MOV 


CSP)*,a*ERRVFC 


i i RESTORE ERROR VECTOR 


93 7 










.MACRO 


$$SETMAIL ?$ARG1 




938 












CLR 


$PASS 


j j CLEAR PASS COUNT 


939 












BITB 


*APTSIZE,$ENVM 


ll TEST USER SIZE UNDER APT 


940 












BEQ 


$ARG1 


i; YES, USE NON APT SWITCH 


941 












MOV 


0$SWREG,SWR 


UNO, USE APT SWITCH REGISTER 


942 










$ARG1: 








94 3 










.ENOM 


$$5ETMAIL 




944 


002064 


005067 


176716 






CLR 


IPAS5 


l iCLEAR PASS COUNT 


945 


002070 


132767 


000200 


176723 




BITB 


OAPTSIZE,$ENVM 


5 j TEST USER SIZE UNDER APT 


946 


0020 76 


001403 








BEQ 


67$ 


iiYES.USE NON APT SWITCH 


94 7 


002100 


C12767 


001022 


176740 




MOV 


tf$SWREG,SWR 


jjNO.USE APT SWITCH REGISTER 


948 


002106 








67$: 








949 


002106 


012737 


013314 


000020 




MOV 


0$ERR0R,&)010TVEC i:SET UP IOT VECTORS 


950 


002114 


012737 


000340 


000022 




MOV 


034O,U4IOTVEC*c 


l i TO GO TO ERROR ROUTINE 


951 


002122 


005037 


177766 






CLR 


a#1777b6 


: CLEAR CPU ERROR REGISTER 


952 


002126 


104401 


001162 




TYPE 


.OP.iSGc 


? iOPERATOR MESSAGE 2 


953 


002132 


104401 


001224 






IYPE 


, 0PMSG3 


j OPERATOR MESSAGE 3 


954 










. SBTTL 


GET VALUE FOR SOFTWARE 


SWITCH REGISTER 


955 


002136 


00573/ 


000042 






TST 


o)042 


iiARE WE RUNNING UNDER XXDP/ACT? 


956 


002142 


001012 








BNL 


68$ 


1 sBRANCH IF YES 


957 


0021'»4 


12672/ 


1 76650 


000001 




CMPB 


$FNV,V>1 


jjARE WE RUNNING UNDER APT? 


958 


0021'i2 


001406 








BEQ 


68$ 


j : BRANCH IF YES 


959 


0021 34 


026727 


176666 


000176 




CMP 


SUR.ttSWREG 


llSO> TWARE SWITCH REG SELECTED? 


960 


002152 


001005 








BNL 


69$ 


j {BRANCH IF NO 


961 


002 1 64 


104406 








GTSWR 




j ;GET SOFT SWR SETTINGS 


962 


002166 


000403 








BR 


69$ 




9*,'> 


0021/0 


112767 


000001 


010566 


68$: 


MOVB 


<>1,$AUT0B 


iiSLT AUTU-MUUE INDICATOR 


964 


002176 








69$: 









iEQ 0024 



G> OBAl ARi AS 
KD J 11 A. MAC 



MP 



MACUl 30AC1052) 
03-APR-84 11:36 



04-APR-84 
GET 



10; 38 PAGE 25 
VALUE FOR SOFTWARE 



SWITCH REGISTER 



SfcQ 0025 



96 5 
966 
96/ 
966 
969 
9 70 
971 
972 
9 73 
974 
9/5 
976 
9/7 
978 
979 
980 
981 
98 c? 
983 
984 

98 5 
986 
98/ 
988 
989 
990 
991 

992 
993 

994 

995 

996 

99 7 
998 
999 

1000 
1001 
1002 
1003 
1004 
1005 
1006 
1007 
1008 
1009 
1010 

ion 

1012 
1013 
1014 

1015 
1016 
101/ 
1018 
101) 
1020 



002176 
002202 



005067 
012737 



176602 
000014 



177746 



RESTART: UM 

MOV 



*TESTN 
VH4,aflCCR 



j RESET iTESTN TO ZERO 
I SET CACHE TO FORCE MISS 



002210 
002210 
002214 
002222 
002230 
002234 
002;'42 
002246 
002252 
002256 
002262 
002266 
0022 72 
002276 



002302 
002302 
002304 
002306 



005267 
013767 
012737 
013704 
012737 
005037 
005037 
005037 
010437 
005037 
(105037 
00503 7 
000167 



104000 
000002 
001325 



002310 000002 



176570 
000114 
001630 
000004 
002302 
177746 
17 7744 
177752 
000004 
177744 
17 7766 
001116 
000010 



176606 
000114 

000004 



* + + + *+.♦, + + * + + ** + ******** + * + + + + ************ + + *. u + * + ** + ******^.>* + + + 



♦TEST 1 



CACHE REGISTER ACCESS TEST 



CHECK REGISTER ACCESS - THIS TEST WILL VERIFY EACH OF THE THRFE 
CACHE MEMORY SYSTEM REGISTERS CAN BE ACCESSED WITHOUT A TRAP TO 
{LOCATION 4CN0N-EXISTANT ADDRESS TRAP) OCCURRING THE REGISTERS TO 
BE TESTED ARE: 

17777746 
17777744 
1/777752 
ACCESSED WITH A WRITE CYCLE. 



CACHE CONTROL 

Mt. .DRY SYSTEM ERROR 
HIT/MISS 
{EACH REGISTER WILL BE 



BGNTST 

SAVE CONTENT OF LOCATION 4 

LET LOCATION 4 POINT TO ERROR ROUTINE 
{TEST THE CACHE REGISTERS 
{RESTORE CONTENTS OF LOCATION 4 
{EXIT TST 

CACHE REGISTER ADDRESSES 



CCR- 

MSER- 
HITMIS- 
ERROR ROUTINE; 

{ENDTST 



17777746 
17777744 
17777752 
ERROR IN 
RETURN 



CACHE SYSTEM 



+ + + + + + + * + +. + ******* + ************ + ***** + **** + + *** + * + * + ** + + + * + + * + * 



TST1: 



En. r - OUT: 



INC 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
CLR 
MOV 
CLR 
CLR 
CLR 

JMP 



ERROR 
.WORD 

.WORD 

RVI 



iTESTN 
00114. SI 
ORAMPAR , 
804, R-t 

OERROUT , 

aoccR 

OOMSER 
OOHITMIS 

R4,a$4 
a MISER 
MOCPEHEG 
aoSOFTER 
TST2 



OCOO 

y.ui4 

304 



INCREMENT TEST NUMBER 
SAV r " PARITY INTERRUPT 



VECTORS 



ERRMSG 



SE'. UP TRAP CATCHER FOR PARITY ERRORS 
SAVE CONTENTS OF VECTOR 4 
LET VECTOR 4 POINT TO ERROR ROUTINE 
TEST ACCESS TO CACHE CONTROL REG 
TEST ACCESS TO MEMORY SYSTEM ERR REG 
TEST ACCESS TO . iT MISS REGISTER 
RESTORE VECTOR 
{CLEAR THE MEM SYS ERROR REG 
CLEAR THE CPU ERROR REGISTER 
CLEAR THE SOFT ERROR COUN'I 
JUMP OVER DATA TABLES OR SUBROUTINES 
TO NEXT TEST 



{ALL ERRORS TO TRAP TO EMT VECTOR 

; UNIQUE ERROR NUMBLR 

j ADDRESS OF ERROR MESSAGE 

jC'\CHE SYSTEM ERROR 
{CONTINUE FROM ERROR 



N 






GLOBAt 


ARFAS 


MAC Y 11 


30 AC 1052 ) 


04 -A 


KDJ11A. 


MAC 03 -APR -84 


11:36 




!0?i 










1022 


002312 








1023 










1024 










1025 










1026 










10? 7 










1028 










1029 










1030 










1031 










103? 










1033 










1034 










1035 










1036 










1037 










1038 










1059 










1040 










1041 










104? 










1043 










1044 










1045 










1046 










104 7 










1048 










104? 


00231? 








3 OliO 


002312 


00526 7 


176466 




1051 


002316 


012701 


000001 




low 


002322 


005067 


175420 




1053 


002326 


01016/ 


175414 




1054 


OD2332 


026701 


175410 




1055 


002336 


001415 






1056 


002340 


005767 


17540? 




105/ 


002544 


001007 






1058 


002346 


032701 


174400 




1059 


002 AS? 


001007 






1060 


002354 


104000 






?061 


C02356 


000003 






1062 


002360 


001325 






1063 










1064 


002362 


000403 






1065 


002364 








1066 


002364 


104000 






106,' 


002366 


000004 






106 A 


0023 70 


001325 






106'* 










;o-'c- 


01 V 4 .'.' 


022 'V 


OO-'OOO 1 


7 7 ; 4'> 


10 '1 


002400 


001003 






IwV 


002402 


012737 


0004 00 1 


7 .* ,'46 


1 o '". 


••'*.. -410 


00*. 101 






J,. ' ■ . 


0024 12 


10334 c 







!-84 10:38 PAGE 26 
Tl CACHE REGISTER 



ACCESS TEST 



SEQ 0026 



CTST2: 

. **************** ******* *** ************* *************** 4. ******** 

♦ TEST 2 TEST CACHE CNTRL REG BITS 

*************** *********************************** xs i /. ********-:.** 

CCR REGISTER BIT TEST - THIS TEST WILL VERIFY THAT EACH RFAD/WRTTF BIT OF 
THE CACHE CONTROL REGISTER CAN BE SET AND CLEARED INDIVIDUALLY AND THAT 
BITS 15 - 11 AND BIT 8 ARE ALWAYS READ AS ZEROS. 

BGNTST 

INITIALIZE GOOD DATA TO ftl 

CLEAR CCR 

DO UNTIL ALL BITS TESTED 

WRITE GOOD DATA TO CCR 
READ CCR 

lF CCR NOT EQUAL TO GOOD DATA THFN 
IF CCR EQUAL TO ZERO THEN 

IF GOOD DATA NOT EQUAL TO BITS<15-11> OR BIT 8 THEN 
ERROR IN CACHE SYSTEM 

ENDIF 
ELSE 

ERROR IN CACHE SYSTEM 
ENDIF 
ENDIF 

UPDATE TO NEXT BIT 
NDDO 
NDTST 

******** ************* ****** ************************************ 
TST2: 

; INCREMENT TEST NUMHFR 

; INITIALIZE GOOD O'UA TO #1 

. p[ FAR CCR 

•.WRITE GOOD DATA TO CCR 

;IF CCR NOT EQUAL GOOD DATA 

; THFN 

; IF CCR EQUAL TO ZFRO 

; THEN 

i IF GOOD DATA NOT BITS* lb U> OR 8 

{THEN 

;AU fcHROHS TO TRAP TO EMT VECTOR 

j UNIQUE ERROR NUMBER 

lADDRESS OF ERROR MESSAGt 

; CACHE SYSTEM ERROR 
jENDlF 

;AU ERRORS TO TRAP TO EMT VECTOR 
i UN I QUE ERROR NUMBER 



1$ 



3$ 



4 J 



10 V, 



INC 


HESTN 


MOV 


*1. Rl 


CLR 


CCR 


MOV 


Rl, CCR 


CMP 


CCR, Rl 


RFC1 


4$ 


TST 


CCR 


UNF 


3J 


BIT 


01 74400, Rl 


BNF 


4* 


ERROR 




.WORD 


*> 


.WORD 


ERRMSG 


RR 


4$ 


t RROR 




. WORD 


4 


.WORD 


fcRRMSG 


CMP 


,72000, oJ^CCR 


BNf 


5 5 


MOV 


d400.a#CCR 


HJl 


Rl 


RCC 


is 



? ADORE 



OF 



ERROR MFSSAGt 

;CACH< SYSTEM ERROR 
j WAS LAST FUNCTION WRltE WHONli TAG >M 



iU NOT (iO SHIFT 11FT AND DP U[ 

;HU!)H CACHt 10 GET RID Of- WRONG 

; TAG PARITr 

juPOATf TO NEXT mi 

j DO UNTIL AlI BIT\> TESTED 



T T. : 



GLOBAL ARIAS 
KDJ11A.MAC 



MACU1 30AU052) 
05 -APR 84 11:36 



04 -APR -84 
T2 



io. ? ; 

10 /A 
10 M 
1080 
1081 
1082 
1085 
1064 
108S 
106b 
108* 
1088 
108* 
1090 
1091 

10^2 
109? 

10^4 

1096 

1097 

iosa 

1099 

1100 
1101 
1102 
110! 
1104 
110% 
1106 
110/ 
1108 
1109 
1110 

1111 

111? 
1115 
1114 
lll r > 
1116 
111/ 
1118 
111.9 
1120 
U21 
112? 
1125 

1 1;?4 

1125 
1126 
1127 
1128 
1129 
1150 
1151 
H32 



002414 



002414 
002414 
002420 
002426 

0024 52 
002440 



002454 
002460 
0024b? 
002464 
002466 
0024 70 



00526 7 
012757 
005057 

012767 
0127^7 



176364 
002550 
00112? 

000004 

17777/ 



000114 



175306 
00112? 



002446 012767 000200 X 752 72 



015701 
005701 
001403 
104000 

ooooov 

001325 



00112c' 



10; 38 PAG*-. 2 
TEST CACHE 



4 



CNTRl. REG BITS 



SEU OOLV 



CTST3: 



*TFST 3 



TEST FORCE MISS FUNCTION 



FORCE MISS TEST - THIS TEST WILL VERIFY THAT ALL REFERENCES MADE 
WITH EITHER BIT<3> OR BIT<2> OF THE CCR SET CAUSE A CACHE MISS AND 
LEAVE THE CACHE ENTRY UNCHANGED, FIRST WHITE A TEST ADDRESS WITH 
BITS<3{2> CLEARED TO ALLOCATE CACHE AND SET A KNOWN DATA PATTERN 
INTO THE CACHE, THEN SET BIT<2> ANO REWRITE THE SAME ADDRESS WITH 
NEW DATA. NEXT CLEAR BITS<35?> AND READ THE TEST ADDRESS, THE DATA 
SHOULD EQUAL TO PATTERN 1, FINALLY READ THE TEST ADDRESS WITH BIT<3> 
SET, THE DATA SHOULD EQUAL PATTERN 2. A LAST WRITE MUST BE DONE WITH 
BOTH FORCE BITS CLEARED BECAUSE THE CACHE AND MAIN MEMORY HAVE 
DIFFERENT DATA, 



BGNTST 

WRITE TEST ADDRESS WITH PATTERN 1 

1 jET CCR BITS<3;2> « 0,1 

WRITE TEST ADDRESS WITH PATTERN 2 

CLEAR CCR BIT<3> 

READ TEST ADDRESS 

SAVE HIT/MISS REGISTER DATA 

COMPARE RECEIVED DATA TO PATTERN 1 

IF DATA NOT EQUAL THEN 

ERROR IN CACHE SYSTEM 
ENDIF 

SET CCR<3;2> * 1,0 
READ TEST ADDRESS 
SAVE HIT/MISS REGISTER DATA 
COMPARE RECEIVED DATA TO PATTERN 2 
IF DATA NOT EQUAL THEN 

ERROR IN CACHE SYSTEM 
ENOIF 

CLEAR CCR<3:2> 
WRITE TEST ADDRESS 
ENOTST 



J 



TST3: 



INC 
MOV 
Cl.R 

MOV 
MOV 

MOV 

MOV 
TST 

m.u 

ERROR 
.WORD 
.WORD 



ITESTN 

CFMPARR,hmi4 
StfTSTl OC 

0BIT02. CCR 

*l /////, H*TSTLOC 

0200 , CCR 

tfOTSTl OC.Rl 

Rl 

li 



ERRMSG 



l INCREMENT TEST NUMBER 
I St TUP PARITY VECTOR TO 
IWRITE TEST LOCATION 
I ALLOCATES CACHF AND 
iSET CCR BIT5<3i2> • 
lURITE TEST LOCATION 
iWRITES MEMORY WITH 



POINT TO HANDLER 
WITH PATTERN 1 
MEMORY WITH ZEROS 
0. I (FORCE CACHE MISS 1 
WITH PATTERN 2 
ONES, CACHE STILI ZEROS 
) 



iCLEAR CCR BIT 3 (CLEAR FOPCE MISS 

,ANO SET PARITY ABORTS 

iREAO TEST ADDRESS (SHOULD HEAD ZEROS IN CACHE > 

iCCMPARE RECEIVED DATA TO PATTIWN I 

I If DATAS NOT EQUAL THEN 

j All ERRORS TO TRAP TO EMT VECTOR 

ILINIQI* E,RRQR NlttUER 

tAQQRLSS OF ERROR MESSAGE 



c 



3 



GLOBAL 


AW AS 


MAC 111 


30 A i 1052) 


KDJ11A. 


MAC 03 -APR 84 


11 j 36 


1133 








1134 


0024 72 


052 76 7 


000010 


1135 


003500 


013701 


001122 


113b 


002504 


020127 


177777 


1137 


002510 


001403 




1138 


00251*? 


104000 




na* 


002514 


000006 




1140 


002516 


001325 




1141 








1142 


002520 


005067 


175222 


1143 


002524 


00503/ 


001122 


1144 


002530 


005037 


177/44 


1145 


002534 


005037 


177 766 


1146 


002540 


005037 


001 lib 


1147 


002544 


000167 


000006 


1148 








1149 








ll r >0 


002550 






1151 


002550 


104000 




1152 


00255,? 


00000 7 




ll r >3 


002554 


001325 




1154 








1155 








115b 


002556 






1157 








1153 








115« 








1160 








1161 








11 be? 








1165 








1164 








1165 








1166 








116 7 








1168 








1169 








1170 








11/1 








1 1 72 








1173 








11 /4 








1175 








1176 








1177 








1178 








11/9 








1180 








1181 








lift? 








1185 








1184 








1185 


002556 






1186 


002556 


00526 7 


I Z6222 


118/ 


002562 


012/3/ 


002 /02 


U88 


002570 


005037 


001122 



04 APR 84 



000114 



t8' 



10 { *8 v 
TEST 



m& 



8 



MISS FUNCTION 



175246 1* 



2$: 



FMPARR; 



bib 

MOV 

CMP 

DEQ 

ERROR 

.WORD 

.WORD 

CLR 
CLR 
CLR 

CLR 
CLR 
JMP 



ERROR 

.WORD 
.WORD 



0BIT03, CCR 

SOTSTLOC.fll 

Rl. 0177777 

2$ 

6 
ERRMSG 

CCR 

84TSTL0C 

aottSLR 

80CPEREG 

84S0FTER 

TST4 



ERRMSG 



I CACHE SYSTEM ERROR 
SET CCR BITS <3;2> • l,0(FORCE CACHh 
READ TEST LOCATION (SHOULD READ ONES 
COMPARE RECEIVED DATA TO PATTERN 'd 
IE OATAS NOT EQUAL THEN 
ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OE ERROR MESSAGE 

I CACHE SYSTEM ERROR 
CCR BITS<3;2> 



SEQ 0028 



MISS) 

IN MEMORY) 



CLEAR 
WRITE 
CLEAR 

CLEAR 
CLEAR 



SS 



TEST ADDRE 
THE MEM SYS ERROR REG 
THE CPU ERROR REGISTER 
THE SOFT ERROR COUNT 

TABLES OR SUBROUTINES 



SOFT 
JUMP OVER DATA 
TO NEXT TEST 



PARITY ERROR ON FORCE 
ALL ERRORS TO TRAP TO 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 



MISS 

EMT VECTOR 



CTST4: 



♦TEST 4 



TEST HIT MISS REGISTER 



J 



HIT/MISS REGISTER TEST PART 1 - THIS TEST WILL VERIFi THAT 
REGISTER CORRECTLY LOGS HITS ANO MISSES. FIRST WRITE A TEST 



TO 

T 



BITS<3;2> CLEARED 

THE CACHE. THEN 3; T BIT «*.'■"» ANO REWRITE THE 
NEXT CLEAR CCR B]TS<3:?r> ANO READ THE Tt ST 
SHOULD HAVE LOCCtJ A HIT. FINALLY READ THE 



TMf HIT /MISS 
ADDRESS WITH 



ALLOCATE CACHE ANO SET A KNOWN DATA PATTERN INTO 

WITH NEW DATA, 
HIT MISS REGISTER 
PLUS 20000(8) THE 



SAME ADDRESS 
ADDRESS, J^ 
TEST ADDRESS 



HIT/MISS REGISTER SHOULD HAVE LOGGED A MISS, 

BGNTST 

WRITE TEST ADDRESS WITH PATTERN 1 

SET CCR BITS<3:2> - 0.1 

WRITE TEST ADDRESS WITH PATTERN 2 

CLEAR CCR BJV** 

READ TEST ADDRESS 

IF HIT/MISS REGISTER BIT 3 NOT SET THEN 

ERROR IN CACHE SYSTEM 
ENDIF 

READ TEST ADDRc.SS ♦ 20000(8) 
IF HIT/MISS REGISTER BIT 3 SET THEN 

ERROR IN CACHE SYSTEM 
ENDIF 

E NOT ST 

j ♦** *** ** ♦,. « *** ************* *** ***** * *** ♦ *********************** 
TST4i 

INC HESTN i INCREMENT It ST NUMBER 

MUV OHMPARR.ani* j St TUP PARITi VECTOR »0 POINT Ti 1 HANDLER 

CLR a#TSTLOC iWRITt TEST LOCATION WITH PATTERN i 



GLOBAi ARIAS 
KD J VIA. MAC 



[) 



MAC 1 11 30AC1052) 
03 -APR -84 11:36 



04 



APR 84 

T4 



10 tie PAGE 
TEST HIT 



29 

MISS REGISTER 



SEQ 0029 



1109 
1190 
1191 
1102 
1193 
1194 
1195 
1196 
1197 
1198 
1199 
1200 
1201 
1302 
1203 
1204 
1205 
1206 
1207 
1208 
1209 
1210 
1211 
1212 
1213 
1214 
1215 
1216 
121? 
1218 
1219 
1220 
1221 
1222 
1223 
1224 
1225 
1226 
122/ 
1228 
1229 
1230 
1231 
1232 
1235 
1234 
1235 
1236 
123/ 
1238 
1239 

lr!40 

1241 
124,'" 

!i24'. 
1244 



002574 
002602 



002616 
002622 
002630 
002632 
002634 
002636 

002640 
002t>4* 

002652 
002654 
002656 
002660 

002662 
002662 
002666 
002672 
002676 



002702 
002702 
002704 
002706 



002710 



012767 
012737 



000004 
177777 



175144 
001122 



002610 012767 000200 175130 



013701 
032737 
001003 
104000 
000010 
001525 

013701 
032737 

001403 
104000 
000011 
001325 



00503 7 
00503 7 
005037 
00016 7 



104000 
000012 
001325 



001122 

000010 177752 



021122 

000010 177752 



177 744 

177766 
001116 
000006 



It 



2$ 



HMPARR : 



CT5T5: 



MOV 
MOV 

MOV 

MOV 
BIT 
BNE 
ERROR 

.WORD 
.WORD 

MOV 
BIT 
BEQ 
ERROR 
, WORD 
♦ WORD 



CLR 

CLR 
CLR 
JMP 



ERROR 

.WORD 
.WORD 



OBI TOP, CCR 
0177777, BftTSTLOC 

#200, CCR 

80TSTl.0C.Rl 
0BITO3, SOHITMIS 
li 

10 
ERRMSG 

80TSTL0C»8192. ,R1 

06IT03, SOHITMIS 
2$ 

11 
ERRMSG 



QOMSER 
QOCPEREG 
80SCFTER 
TST5 



12 

ERRMSG 



WRITE CACHE AND MEMORr WITH ZEROS 

SFT CCR 0ITS<3:2> ■ 0,1(F0RCF CACHE MISS) 

WRITE TEST LOCATION WITH PATTERN 2 

MEMORY --1. CACHE STILL ZERO 

CLEAR CCR BIT 3 (CLEAR FORCE MISS) 

ANO SET PARITY ABORTS 
READ TEST ADDRESS (SHOULD BE CACHE HIT) 
IF HIT/MISS REGISTER BIT 3 NOT SET 
THEN 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 

j CACHE SYSTEM ERROR 
READ TFST LOCATION » 2C000C8) SHUULD MISS 
IF HIT/MISS REGISTER BIT 3 SFT 
THEN 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 

jCACHE SYSTEM ERROR 

{CLEAR THE MEM SYS ERROR REG 

iCLEAR THE CPU ERROR REGISTER 

j CLEAR THE SOFT ERROR COL^T 

lJUMP OVER DATA TABLES OR SUBROUTINES 

I TO NEXT TEST 

jPARITf ERROR DURING HIT/MISS REGISTER TEST 

I ALL ERRORS TO TRAP TO EMT VECTOR 

} UNIQUE ERROR NUMBER 

j ADDRESS OF ERROR MESSAGE 



I 



♦TEST 5 



TEST HIT MISS REGISTER BITS 



I 



I «IT/MISS REGISTER TEST * THIS 
REGISTER CORRECTLY LOGS CACHE 
, THAT EACH BIT Of' THE REGISTER 



Vi 



FLOATING A ZERO THROUGH 
|BY EXECUTING A 1ST 80HM 
•REGISTER) AT SUCCESSIVE 
|Tf THE I/O PAGE ADDRESS 
|M;SS TO BE RECORDED. 



TEST WILL VERIFY THAT THE HIT/MI 
HITS ANG MISSES, IT WILL ALSO VERIM 
IS UNIQUE. THIS WILL BE DONE Bi 



ONES. 
IS THE 



THE ROTATING WILL BE OONF 



A FIELD OF 

(UHERE HM 

POSITIONS IN A SFT OF FOUR NOPS 

OF THE HIT/MISS REGISTER SHOULD 



AODRESS OF THE 



HIT /MISS 

THf Rt AO 
CAUSE A 



tBGN 
j INI 

I INI 
j DO 
» » 
{ • 



TST 

TIAL1/E LOOP INDICATOR 

IIAL.T2E EXPECUO DATA 
UNTIL LOOP INDICATOR - SEVEN 
PUT BACKGROUND DATA INTO 
INSTRUCTION INTO 



EXfcCUl ION BL* y 

TFST I 11CAT10N 



ER 



PUT TST 
JUMP TO EXECUTE BUFFFR 
If EXPECTED DATA NE RECEIVED DATA 
ERROR IN CACHE SYSTEM 



THEN 



GLOB At. 


AW AS 


MAC 1 1 1 


30AU052) 04 -A! 


KDJUA. 


MAC 03 -APR 84 


11:36 


1245 








1246 








124; 








1248 








1249 








1050 








1251 








1252 








1253 








1254 








1255 








1256 








1257 








1258 








1259 








1260 


002 ao 






1261 


00^710 


00526 7 


176070 


1262 


002714 


012737 


001630 000114 


1263 


002722 


005067 


176132 


1264 


002726 


012703 


020000 


1265 


002732 


012704 


003070 


1266 


002736 


026727 


176116 000007 


1267 


002744 


001432 




1268 


002746 


012705 


00000/ 


1269 


002752 


012701 


003052 


12 70 


002 756 


012702 


001122 


1271 


002762 


012122 




1272 


002764 


077502 




1273 


002766 


005763 


001122 


1274 


002772 


005723 




1275 


002 7/4 


004 767 


176122 


12/6 


003000 


022405 




1277 


003002 


001003 




1278 


003004 


005267 


176050 


1279 


003010 


000752 




1280 


003012 






1281 


003012 


012737 


002/14 001120 


1282 


003020 


004/6 7 


176614 


1283 


003024 


104000 




1284 


003026 


000013 




1285 


003030 


001325 




1286 








128 7 


003032 






1288 


003032 


00503 7 


177744 


1289 


003036 


005037 


17 7766 


1290 


003042 


005037 


001116 


1291 


003046 


000167 


000034 


1292 








1295 








1294 


003052 


000240 




1295 


003054 


000240 




1296 


003056 


000240 




129/ 


003060 


000240 




1298 


003062 


013/05 


177752 


1299 


003066 


000207 




HOC 









!-84 
T5 



10; 38 PAGE 30 
Tt ST HIT MISS 



3 



REGISTER BITS 



GEQ 0030 



FNDIF 

INCREMENT LOOP INDICATOR 
UPDATE EXPECTED DATA 



jENDDO 






jEXIT 


TST 




! BACKGROUND OATAj 


j 




NOP 


• 




NOP 


j 




NOP 


j 




NOP 


{ 




MOV 8#HM,R5 


; 




RTS PC 


jENDTST 






I ;+******+*****++**+++***+♦++*** 


TST5j 








INC 


• TF.STN 




MOV 


ORAMPAR.80U4 




CLR 


LOOP IN 




MOV 


020000, R 3 




MOV 


0EXPTBL,R4 


1$: 


CMP 


LOOP IN. 07 




BEQ 


ENDMRT 




MOV 


07.R5 




MOV 


0BACDAT.R1 




MOV 


4TSTL0C.R2 


2$: 


MOV 


(Rl)*, (R2)* 




COB 


R5. 2$ 




fST 


TSTL0C(R3^ 




1ST 


(R3)» 




JSR 


PC, TSTLUC 




CMP 


(R4)», R5 




BNE 


3$ 




INC 


LOOP IN 




BR 


li 


3$: 








MOV 


OTST5»4,Q0SOFTRE 




JSR 


PC.APTSFT 




ERROR 






.WORD 


13 




.WORD 


ERRMSG 


ENDHRT: 








CLR 


BtfMSf'R 




CLR 


BOCPERE.C 




CLR 


6WSOTER 




JMP 


TST6 


BACDAT; 


.WORD 


NOP 




. WORD 


NOP 




.WORD 


NOP 




, WORD 


NOP 




MOV 


o>0HirMl5,R5 




RTS 


PC 



********** ***+*****+*****«*****+* 



j INCREMENT TEST NUMBER 

jSET UP VECTOR FOR UNEXPECTED PARITY ERROR 

INITIALIZE LOOP INDICATOR 

LOAD R3 WITH 1ST ADDR IN 2ND BANK OF MEM, 

GET ADDRESS OF EXPECTED DATA TABLE 

DO UNTIL LOOP INDICATOR EQUALS " 

THEN EXIT 

LOAD R2 WITH 7 

PUT BACKGROUND DATA INTO 

EXECUTION BUFFER 

LOOP FOR SEVEN UORP^ 

SETUP MISS ON FETCH OF INSTRUCTION 

INC R3 BY 2 

GO EXECUTE TEST CODE 

IE EXPECTED DATA NOT EQUAL TO 

RECETVED DATA THEN 

INCREMENT LOOP COUNTER 



MOVE WE TRY ADDRESS TO SOFT RFTURN 

GO TO SOEf ERROR SUBROUTINE 

ALL. ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR N^JMBER 

ADDRESS OK ERROR MESSAGE 

» CACHE SYSTEM FRROR 

CLEAR THE MEM SYS ERROR RKi 
CLEAR THE CPU ERROR REGISTER 

CLEAR THF SOFT FRROR C0UN1 

JUMP OVER DATA TABLES OR SUBROUTINES 



TO NEXT TEST 



{SAVE CONTENTS OF HIT/MISS REGIS HR 



3 



GLOBAL ARIAS 
KOJ11A.MAC 



1501 
130*2 
1303 
1304 
1305 
1306 
130? 
1308 
1309 
1310 
1311 
1312 
1313 
1414 
1315 
1316 
131'' 
1318 
1319 
1520 
1321 
132? 
1323 
1324 
1325 
1326 
1327 
1328 
1323 
1330 
1331 
1332 
1333 
1334 
1335 
1336 
1337 
133H 
133^ 
1340 
1341 
1342 
134 5 
1344 
154S 
1346 
1 34 7 
1548 
134 9 
1 .550 
1351 
1 352 
1 V>', 
1354 
1355 
1356 



003070 
003072 
003074 
003076 
003100 
003102 
003104 



MACU1 30AI 1052) 
03 -APR -84 11:36 

000077 
00003 7 
000057 
00006 7 
000073 
000075 
000076 



003106 



04 


-APR -84 
T5 


10 


38 PA 
TEST H 


Rfl 




EXPTBL: 


.WORD 


1't 








.WORD 


37 








.WORD 


57 








.WORD 


67 








.WORD 


73 








.WORD 


75 








.WORD 


76 



AGE 31 

HIT MISS REGISTER BITS 



SEQ 0031 



TST6t 

♦TEST 6 TEST BYTE ALLOCATION OF CACHE 

8YTE ALLOCATION TEST- THIS TEST WILL VERIFY THAT THE CACHE SYSTEM CORRECTLY 
HANDLES 8YTE ACCESSES. THE TEST WILL FIRST CHECK THAT A WRITE ACCESS WHICH 
IS A MISS DOES NOT UPDATE THE CACHE. THIS WILL BE DONE BY FIRST ASSURRING 
A MISS AT A TEST LOCATION. THEN A WRITE BYTE ACCESS WILL BE DONE. FINALLY 
THE LOCATION WILL BE READ. THE WRITE BYTE SHOULD NOT HAVE ALLOCATED THE 
ADDRESS. NEXT THE TEST WILL VERIFY THAT IF A WRITE BYTE ACCESS IS A HIT 
THAT THE CACHE. LOCATION IS UPDATED. THE TEST WILL FIRST WRITE A TEST LOCATION 
WITH A PATTERN TO ALLOCATE THE ADDRESS. THEN A SECOND PATTERN WILL BE WRITTEN 
TO THE HIGH BYTE OF THE TEST LOCATION, THE TEST I OCATION WILL THEN BE READ. 
IF THE HIGH BYTE OF THE TEST LOCATION IS EQUAL TO THE. SECOND PATTERN THEN THE 
LOCATION WAS UPDATED. THE SECOND TEST WILL BE REPEATED TO TEST LOW BYTE 
ACCESSES. 



BGNTST 

SAVE VECTOR 114 

LET VECTOR 114 POINT TO 

SET PARITY ABORT BIT IN 

READ TF51 1 OCATION ♦ 4I< 

WRITE t -U iJYTE TO TEST 

READ LOW BYTE OF TEST ADDRESS 

IF HIT/MISS REGISTER BIT 3 SET 

ERROR IN CACHE SYSTEM 
END IF 

WRITE PATTERN 1 TO TEST LOCATION 
WRITE BYTE PATTERN 2 TO TEST I OCATION*! 
IF BIT! NOTSETIN HIT/MISS REGISTER THEN 

ERROR IN CACHE SYSTEM 
ELSE; 



BYTE PARITY ROUTINE 
CACHE CONTROL REGISTER 



THEN 



END IF 
WRITE 
WRIi'E 



READ TESi 1 OCATION 
IF RECEIVED DATA NOT 
ERROR IN 



EQUAL TO 
CACHE SYSTEM 



EXPECTED DATA THEN 



LOCATION 

TEST LOCATION 



PATTERN 1 TO TEST 
BYTE PATTERN 2 TO 
IF BIT1 NOTSETIN Hi! /MISS REGISTER THEN 

ERROR IN CACHE SYSTEM 
ELSE 



I OW BYTE 



RE.AD TEST LOCAT ION 
IF RECIEVED DATA NOT 



EQUA1 TO EXPECTED DATA THEN 



END IF 



ERROR IN CACHE SrSTEM 



G3 



GLOBAL ARIAS 
KDJUA.MAC 



135 7 
1358 
1359 
13*0 
1361 
136c? 
1363 
1364 
1365 
1366 
1367 
1368 
1369 
13/0 
13/1 
15 7? 
13, '3 
13/4 
1375 
1376 
1377 
1378 
1379 
1380 
1381 
138;.' 
1383 
13F>4 
1385 
1366 
1387 
lo88 
1389 
1390 
1391 
139? 
1393 
13^4 
1395 
1396 
139/ 
.1398 
1399 
1400 
1401 
HV 
1<*03 
1404 
1405 
1406 
140/ 
1408 
1409 
1410 
14] 1 

14X2 



MAC 11 I 30AI 1053) 
03-APR-H4 11:36 



003106 

003106 
00311? 
003120 
003126 

003132 

003136 
003142 
003150 
003152 
003160 
003164 
003166 
003170 

003172 

003176 
003204 
003212 
003214 
003222 
003226 
003230 
003232 

003234 
003236 
0032*4 
00324c 
003254 
003260 
003262 
003264 

005266 

003,?/,? 

uo3 :>oo 

002306 

■ r?3io 

(JO. '3 16 

00 3 32? 
003324 
003326 

00 33 30 
003332 



005267 
012737 
012767 
005767 

1 0506 7 
105767 
032737 
001410 
012737 
004 76 7 
104000 
000014 
001325 

00506 7 
152737 
032767 
001011 
012737 
004 767 
104000 
000015 
001325 

000414 
022737 
001410 
012737 
004767 
104000 
0C0016 
001525 

00506 7 
15? 73 7 
032 76 7 
001011 

012737 

004 76 7 
104000 
00001 1 
001325 

00040 7 
022 73 7 



1756 7? 
003374 
000200 
015770 

175764 
175 760 
000010 

003112 
176454 



i 75724 
000377 
000010 

003112 
176412 



177400 

003112 
176360 



175630 
0003 7 7 
000010 



00311? 
1/6316 
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T6 TEST BYTE ALLOCATION OF CACHE 



{CLEAR CACHE CONTROL REGISTER 
RESTORE VECTOR 114 
EXIT TST 

BYTE PARITY ROUTINE t SAVE MSER 

RETURN 
ENDTST 

;********************************** 

TST6: 

INC *TESTN 

MOV O8YPARR,a0114 

MOV 0BIT07. CCR 

TST TSTL0C»8192. 



SEQ 0032 



***************************** 



000114 
1/462C 



177/52 
001120 



IS 



001123 
174540 

001120 



001122 
001120 



2* 



3$ 



00U2? 
174444 



001120 



000377 001122 4$ 



CLRB 

TSTB 

BIT 

BEQ 

hUV 

JSR 

ERROR 

.WORD 

.WORD 

CLR 

BISB 

BIT 

BNE 

MOV 

JSR 

ERROR 

.WORD 

.WORD 

BR 

CMP 

BEQ 

MOV 

JSR 

ERROR 
.WORD 
.WORD 

CLR 
BISB 
BIT 
BNE 

MOV 
JSR 
ERROR 

. WORD 
.WORD 

BR 

CMP 



TSTLOC 

TSTLOC 

0BIT03, SOHITMIS 

1$ 

OTST6*4,a<?S0FTRE 

PC.APTSFT 

14 
ERRMSG 

TSTLOC 

0377, aoTSTLOCfl 
O6IT03, HITMIS 
2< 

0TST6*4,a0S0FTRE 
PC.APTSF'T 

15 
ERRMSG 

3$ 

«l//400,aOTSTLOC 

3$ 

OTST6*4.a050FTRE 

PC.APTSFT 

16 
FRRMSG 

TSTLOC 

0377, aoTSTLUC 
0BIT03, HITMIS 
4 5 

0fST6.4,N0SUFTRt 
PC.APTSFT 

17 
ERRMSG 



ABORT 
CCR 



ROUTINE 



CAUSE MISS 



5$ 
0377, 



ao TSTLOC 



INCREMENT TEST NUMBER 
LET VECTOR 114 POINT TO 
SET PARITY ABORT BIT IN 
READ TEST LOCATION > 4K TO 
ON NEXT ACCESS OF TSTLOC 
WRITE LOW BYTE OF TEST LOCATION 
READ LOW BYTE OF TEST LOCATION 
IF 8IT3 OF HIT/MISS REGISTER NOT 
THEN BRANCH 

MOVE RETRY ADDRESS TO SOFT RETURN 
GO TO SOFT ERROR SUBROUTINE 
ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
{WRITE PATTERN 1 TO TEST LOCATION 
;WRITE PATTERN 2 TO HIGH BYTE 
{IF BIT3 NOTSETIN HIT/MISS REGISTER 
{THEN 

{MOVE RETRY ADDRESS TO SOFT RETURN 
jGO TO SOFT ERROR SUBROUTINE 
{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
iF.l.SF. 

{IF TEST LOCATION NOT EQUAL TO 
{PATTERN 2 THEN 

{MOVE RETRY ADDRESS TO SOFT RETURN 
;G0 TO SOFT ERROR SUBROUTINE 
{ALL ERRORS TO TRAP TO EMT VECTOR 
j UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM FRROR 
{WRITE PAT1ERN 1 TO TEST LOCATION 
{WRITE PATTERN 2 TO LOW BYTE 
{IE BIT03 SET IN HIT/MISS REGISTER 
5 THEN BRANCH i WE GOT A HIT. 
I El SE 

sMUVE RETR1 ADDRESS TO SOFT RETURN 
;G0 TO SOFT ERROR SUHROUTINl 
{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS Or LRROR MESSAGE. 

{CACHE SYSTEM E-HROR 

jU TEST LOCATION NOT EQUAL TO 



SET 



GLOBAL AH LAS 
KDJ11A.MAC 



1413 
1414 
1415 
1416 
141? 
1418 
141^ 

i4;:o 

1421 

1422 
1423 
1424 
1425 
1426 
1427 
1428 
142 c > 
14 30 
1431 
14 32 
14 33 
1434 
14 3b 
143b 
143/ 
1438 
14 3^ 
1440 
1441 
1442 
144 3 
1444 
14 45 
14 46 
144/ 
1448 
144S 
1450 
1451 
1452 
1453 
1454 
1455 
1456 
145/ 
14SH 
145 l > 
14*. U 
1461 
1462 
1463 
1464 
14f,5 
1466 
146/ 
1468 



003340 
003342 
003344 
003346 

003350 
003354 
00336C 
003364 
003370 



0033/4 
0033/4 
0033 76 
003400 



003402 



MAO 11 30AC1052) 
03*APK 84 11 ; 36 

001403 
104000 
000020 
0U1325 



04 -APR -84 

T6 



H3 

10 s 38 PAGE 33 

TEST BYTE ALLOCATION OF CACHE 



SEQ 0033 



005067 
005037 
00503 7 
00503/ 
000167 



104000 
000021 
001325 



1743/2 

177744 
177 766 
001116 
000006 



5$ 



BYPARR; 



BEQ 
ERROR 
.WORD 
.WORD 

CLR 
CLR 
CLR 

ClR 
JMP 



ERROR 
. WORD 
.WORD 



5$ 

20 
ERRMSG 

CCR 

80MSF.R 
aaCPF.REG 
6WS0FTER 

TST7 



21 
ERRMSG 



, PATTERN 2 THEN 

I ALL ERRORS TO TRAP TO EMT VECTOR 

j UNIQUE ERROR NUMBER 

j ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
CCR BEFORE EXIT 
THE MEM SYS ERROR REG 
THE CPU ERROR REGISTER 
THE SOFT ERROR COUNT 
OVER DATA TABLES OR SUBROUTINES 



} CLEAR 
I CLEAR 
(CLEAR 
(CLEAR 

{JUMP 

» TO NEXT TEST 



{PARITY ERROR DURING BYTE ALLOCATION TEST 
;ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 



CTST7: 

**** + ** + ****#♦♦ + *♦************************ + ***** + *»* + ***»,» + * + ** 



*TEST 7 



TEST CACHE BYPASS u1MU) 



{+**♦* + ** + ♦*# + ***♦***•♦♦ + ********* ♦■*•♦***********************.> • V 

PDR BIT15 (8YPASS) TEST - THIS TEST WILL VERIFY THAT WHEN BIMrv 



IN A PDR ANO AN ACCESS IS MADE TO 
THAT WOULD NORMALLY CAUSE A CACHE 
CACHE LOCATION IS INVALIDATED ANO 



SET 



A LOCATION MAPPED BY THE SELECTED PDR 



BY FIRST WRITING A TEST LOCATION WITH A 
LOCATION WILL BE WRITTEN AGAIN 



ACCESS. THE CACHE IS BYPASSED (I.E. THE 
A MAIN MEMORY IS READ. THIS WILL BE DONE 

KNOWN PATTERN TO ALLOCATE THE ADDRESS 
THEN THE LOCATION WILL BE WRITTEN AGAIN WITH THE MMU ENABLED ANO BIT <15> SET 
IN THE CONTROLLING PDR WITH A NEW PATTERN. THE LOCATION WILL THEN BE READ 
ANO A MISS SHOULD BE LOGGED IN THE HI I /MISS REGISTER. THIS READ WILL ALSO 
BRING VALID DATA INTO CACHE FROM MEMO*?'. THE MMU WILL AGAIN BE ENABLED 
WITH BIT <15> SET ANO A READ CYCLE DONE. THIS dHOUlO INVALIDATE THE CACHE. 
NEXT THE MMU WILL BE DISABLED ANO THE LOCATION READ FOR A THIRD TIME. THIS 
WILL BE DONE WITH 0IT<15> STILL SET. A MISS SHOW D ALSO BE LOGGED LASTLY 
B1T<15> WILL BE CLEARED AND JH£ MMU ENABLED AND THE LOCATION AGAIN READ. 
THIS TIME A CACHE HIT SHOULD BE LOGGED. 



BGNTST 
SETUP 
WRITE 
SET BI 
ENABLE 
WRITE 
DI5ABL 
READ T 
IF HIT 

ENOIF 



MMU REGISTERS 

TEST LOCATION WITH PATTERN 1 

T<15> IN PDR FOR TEST LOCATION 

MMU 
TEST LOCATION WITH PATTERN 2 
E MMU ANO CLEAR BIT<15> IN PDR 
EST LOCATION 
/MISS REGISTER BIT<1> SET THEN 

ERROR IN CACHE SYSTEM 



SET BIT<15> IN PDR FOR TEST LOCATION 

fc'NABl F MMU 

RFAD TEST LOCATION (SHOULD INVALIDATE CACHE) 

DISABLE MMU 

READ I EST t OCA! ION 

IF HIT/MISS REGISTER U1T<1> SET THEN 



Gl OBAl 


AREAS 


MACl 11 


30AC1052) 04 -A 


KDJ11A. 


MAC 03-APR-84 


11:36 




14o9 










14 70 










14 71 










14 7? 










14 75 










1474 










147? 










14/6 










14 7 7 










1478 










14 79 










1480 










1481 


00340,} 








148? 


00340? 


005267 


175376 




1483 


003406 


012737 


0C1630 


000114 


1484 


003414 


004767 


175772 




1485 


003420 


005037 


001122 




1486 


003424 


052767 


100000 


166646 


1487 


0034 32 


052737 


000001 


17/572 


1488 


003440 


012737 


177777 


001122 


1489 


003446 


005067 


174120 




1490 


003452 


04276 7 


100000 


166620 


1491 


003460 


013701 


001122 




149? 


003464 


032767 


000010 


174260 


1493 


0034 72 


001410 






1494 


0034 74 


012737 


003406 


001120 


1495 


003502 


004767 


176132 




1496 


003506 


104000 






1497 


003510 


00002? 






1498 


003512 


001325 






1499 










1500 


003514 


052767 


100000 


166556 


1S01 


003522 


052737 


000001 


1?7572 


1502 


003530 


005767 


175366 




1503 


003534 


042767 


100000 


166536 


1504 


003542 


005067 


174024 




1505 


003546 


005737 


0C1122 




1506 


003552 


032767 


000010 


174172 


150 7 


003560 


001410 






1508 


003562 


012737 


003406 


001120 


1509 


003570 


004/6/ 


176044 




1510 


0035 74 


104000 






1511 


003576 


000023 






1512 


003600 


001325 






1513 










1514 


00560? 


05273/ 


000001 


177572 


1515 


003610 


005737 


001122 




1516 










151/ 










1518 


003614 


032 767 


000010 


174130 


1519 


005622 


001012 






1520 


00?624 


00506 / 


1/3/4? 




1521 


0036 50 


012737 


0034 06 


001120 


15?? 


0056 36 


004/6 7 


1757/6 




15,". 


00 564? 


104000 






15^4 


003644 


000024 







13 

1-84 10:38 PACE 34 
T7 TF.ST CACHE BYPASS CMMU) 

ERROR IN CACHE SYSTEM 

BIT<15> IN PDR 
ON MMU 

TEST LOCAT'ON 

T/MI55 RENTER 0IT<1> NOT SET THEN 
ERROR J.r ^ACHE SYSTEM 

OFF MMU 

T 



SEQ 0034 



ENOIF 
CLEAR 
TURN 
READ 
IF HI 

ENOIF 

TURN 

ENDTS 



TST7{ 

INC 

MOV 

J5R 

Cl.R 

BIS 

BIS 

MOV 

CL.R 

BIC 

MOV 

BIT 

BEU 

MOV 

JSR 

ERROR 

. WORO 

.UORD 



A*+A***4^*****4^**4i*************** + *************** 



2$ 



3$ 



BIS 

BIS 
T5T 
BIC 

CLR 

tst 

BIT 

BEQ 

MOV 

JSR 

ERROR 

.WORD 

.WORD 

BIS 

TST 



BIT 

kh\ 

Cl R 
MUV 
JSR 
frRRON 
• WORD 



MESTN 
vRAMPAR,SCll4 

PC, INITMM 

QOTSTLOC 
*eiT15, KIPDRO 
MTTOO.BOSRO 

dl77777.QOTSTl.OC 

SRO 

0BIT15, KIPDRO 

80T5TL0C.R1 

0BIT03, HITMIS 

21 

*TST7»4,atfS0FTRE 

PC.APTSFT 

2? 

ERRMSG 

0B1T15, XIPOMO 

0BITOO,a$SRO 

TSTLOC 

0BIT15, KIPDRO 

SRO 

QfrTSTLOC 

*6IT03, HITMIS 

3$ 

0TSr/*4,bU>S0FTRE 
PC.APTSFT 

23 
ERRMSG 

OHITOO.iOSRO 

NMSTLOC 



0BIT03, HITMIS 
4$ 

SRO 

*T!"iT/.4.U# ( JUFTRt 
PC.APTSFT 



?4 



INCREMENT TEST NUMBER 

SET UP FOR UNEXPECTED PARITY ERROR 

SETUP MEMORY MANAGEMEMT REGISTERS 

URITE TEST LOCATION WITH PATTERN 1 

SET BIT15 IN PDR FOR TEST LOCATION 

TURN ON MEMORY MANAGEMENT 

WRITE TEST LOCATION WITH PATTERN ?. 

TURN OFF MEMORY MANAGEMENT 

CLEAR BIT15 IN PDR FOR TEST LOCATION 

READ TEST LOCATION 

IF HIT/MTSS REGISTER BIT 3 SET 

THEN 

MOVE RETRY ADDRESS TO SOFT RETURN 

GO TO SOFT ERROR SUBROUTINE 

ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

I CACHE SYSTEM ERROR 
SET BIT15 IN PDR FOR TEST LOCATION 
TURN ON MEMORY MANAGEMENT 
READ TEST LOCATION, BYPASS CACHE 
TURN OFF CACHE BYPASS ON KERNEL PAGE 0. 
TURN Off- MMU 

READ TEST LOCATION- SHOULD BE CACHE MISS 
IF HIT/MISS REGISTER EIT 3 SET 
THEN 

MOVE RETRY ADDRESS TO SOFT RETURN 
GO TU SOFT ERROR SUBROUTINE 
ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 

jCACHE SYSTEM ERPOR 
TURN ON MEMORY MANAGEMENT 
READ TEST LOCATION ONE MORE TIME. 
PREVIOUS READ SHOULD HAVE ALLOCATED 
CACHE SO UE'RE EXPECTING A CACHE HIT 
IF HIT/MISS REGISTER BIT 5 NO." SET 
THEN 

1URN Off- MMU BEFORE ERROR ROUT INI , 
MOVE REIR> ADDRESS TO SOFT RETURN 
GO TO S0F1 ERROR SUBROUTINE 
AIL ERRORS 10 TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 



GLOBAL ART AS 
KDJ1 1A.MAC 



MACU1 30A(1052) 
03-APR 64 11:36 



04 -APR -84 

T7 



1525 
1526 
152 7 
1528 
1529 
1530 
1531 
1532 
1533 
IS 34 
1535 
1536 
1537 
1538 
1539 
1540 
1541 
154? 
1543 
1544 
1545 
1546 
154 7 
1548 
1549 
1550 
1551 
155? 
1Vj3 
1554 
1555 
1556 
1557 
1558 
1559 
1560 
i5M 
1562 
1563 
1564 
1565 
1566 
1567 
1568 
1569 
15 70 
1571 
1572 
1573 
1574 
1575 
1576 
157/ 
15/8 
15/9 

1580 



003646 001325 



003650 
003656 
003662 
003666 
003672 



003676 



003676 
0036 76 
003702 
003706 
003/12 
005 '16 
003722 
003/30 
003732 
003 734 
003/40 
003744 
005 750 
003756 



042767 
005037 
005037 
005037 
000167 



00526 7 
004 767 
005067 
012701 
012702 
052737 
005721 
077202 
012701 
012702 
012703 
012767 
005721 



000001 
177744 
177766 
001116 
000000 



1/5102 
175504 
166442 
140000 
010000 
OOOCOl 



140000 
010000 
010000 
000400 



17 7572 



173770 



10 j 38 PAGE 35 

TEST CACHE BYPASS 

.WORD ERRMSG 



J 3 



(MMU) 



S£Q 0035 



173714 4$: 



BIC *BITOO, SRO 

CLR HOMSfc'R 

CLR SOCPEREG 

CLR SOSOFTER 

JMP TST10 



{ADDRESS OF ERROR MESSAGE 

;CACHE SYSTEM ERROR 
i 'I URN OFF MMU 

1 CLEAR THE MEM SYS ERROR REG 
l CLEAR THE CPU ERROR REGISTER 
j CLEAR THE SOFT ERROR COU^T 
{JUMP OVER DATA TABLES OR SUBROUTINES 
;T0 NEXT TEST 



CTST10: 

;* + * + ** + + + + + + + + +* + * + * + + + **>* + + + + *A + + ******** + * + * + + + >. +********♦*+* 

♦TEST 10 TEST CACHE FLUSH 

FLUSH CACHE TEST - THIS TEST WILL VERIFY THAT WHEN CCR BIT<8> IS 
SET, THE ENTIRE CACHE IS INVALIDATED. FIRST 6K BYTES OK ADDRESSES 
WILL BE READ TO ALLOCATE CACHE. THEN THE CACHE WILL BE FLUSHED. 
THE SAME SET OF ADDRESS WILL THEN BE READ AND THE HIT/MISS REGISTER 
CHECKED AFTER EACH READ FOR A MISS TO BE LOGGED, 

BGNTST 

GET FIRST ADDRESS OF 8KB n UKFER 
INITIALIZE LOOP COUNTER TO 4KW0RD COUNT 
00 UNTIL LOOP COUNTER ■ 

READ SADDRESS* 
ENODO 

GET rlRST ADDRESS OF 8KB BUKF'ER 
INITIALIZE LOOP COUNTER TO 4KW0RD COUNT 
INITIALIZE MISS COUNT 
FLUSH CACHE 
DO UNTIL LOOP COUNTER - 

READ SADDRESS* 

IF HIT/MISS REGISTER BIT < i > SET THEN 



ENDIF 



DECREMENT MISS COUNT 



ENDDO 

IK MISS COUNT NOT EQUAL TO 4096. THEN 



FND1F 

ENOTST 



ERROR IN CACHE SYSTEM 






TST10: 



lis 



2*: 



INC ilESTN 

JSR PC. INITMM 

CLR KIPARb 

MOV #140000, «1 

MOV 04096. . R2 

BIS #BITOO,&#SRO 

TST (Rl). 

SOB R2» II 

MOV #140000, Rl 

MOV #4096. . R2 

MOV 04095. , R5 

MOV 0400, CCR 

TST (Rl)* 



NUMBER 



{INCREMENT TEST 

{INITIALIZE MMU 

{LET PAR6 POINT 10 

{GET ADDRESS OF 8K 

{ IN IT LOOP COUNTER 

{ENABLE MMU 

{READ ADDRESS TO Al I OCATF CACHE 

{DO UNTIL ALL LOCATIONS ALLOCATED 

{GET ADDRESS OF 8K BYTE Bl* TER 

iINIT LOOP COUNTER TO 4I< WORD COUNT 

{PRE LOAD MISS COUNT WITH 409b. 

}Fl i.SH CACHE 

{READ ADDRESS 



LOW 4I< 

BYTE BUFFER 

TO 4K WORD COUNT 



K 



5 



GLOBAL 


ARIAS 


MACU1 


30AC1052) 04-A 


KDJ11A, 


MAC 03 -APR 84 


11:36 


1581 


003760 


032737 


000010 177752 


1582 








1585 








1584 


003766 


001401 




1585 








1586 


003770 


005303 




1587 


003772 


077207 




1588 








1589 








1590 


003774 


005067 


173572 


1591 


004000 


022703 


010000 


159c? 


004004 


001410 




1593 








1594 








1595 


004006 


012737 


003702 001120 


1596 


004014 


004767 


175620 


1597 


004020 


104000 




1598 


004022 


000025 




1599 


004024 


001325 




1600 








1601 


004026 


005037 


1775 72 


1602 


004032 


0C5037 


177744 


1603 


004036 


005037 


177 766 


1604 


004042 


005037 


001116 


1605 


004046 


000167 


GOOOOO 


1606 








1607 








1608 








1609 


004052 






1610 








16U 








161? 








1613 








1614 








1615 








1616 








1617 








1618 








161'* 








1620 








1621 








Ib.'V 








1623 








1624 








1625 








1626 








1627 








1628 








1629 








1630 








1631 








1632 








163 3 








16 '.4 








1635 








16 56 









T10 



10 j 38 PAGE 36 

TEST CACHE "LUSH 



3$ 



55 



BIT 



BEG 
DEC 

soa 



Cl.R 
CMP 
BEQ 



MOV 

JSR 

ERROR 

.WORD 

.WORD 

CLR 
CL.R 
CLR 
CLR 
JMP 



tfBIT03,SWHlTMIS 



3$ 

R3 
R2, 



2$ 



SRO 

^4096. , R3 

5$ 



4T5T10*4,3ttSQFTRE 
PCAPT5FT 

25 
ERRMSG 

sosro 

NOMSER 

aOCPERbG 

SflSOFTER 

TSTU 



SEQ 0036 



SHOULDN'T GET HITS AT (Rl) 

IF BIT03 IN HIT/MISS REG INDICATES A MISS 

THEN 

BRANCH TO 3$ --DON'T DECREMENT THE MISS COUNT 

ELSE 

DECREMENT MISS COUNT IF WE GET A HIT 

LOOP UNTIL ENTIRE CACHE CHECKED 

FALLING THROUGH SOB INDICATE:- THAT ALL 

CACHE LOCATIONS HAVE BEEN CHECKED. 

TURN OFF MMU 

IF MISS COUNT NOT EQUAL TO 4096. 

THEN IT INDICATES THAT NOT ALL CACHE 

LOCATIONS WERE FLUSHED 

MOVE RETRY ADDRESS TO SOFT RETURN 

GO TO SOFT ERROR SUBROUTINE 

ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

s CACHE SYSTEM ERROR 
TURN OFF MMU 

CLEAR THE Mf.M SYS ERROR REG 
CLEAR THE CPU ERROR REGISTER 
CLEAR THE SOFT ERROR COUNT 
JUMP OVER DATA TABLES OR SUBROUTINES 
TO NEXT TEST 



CTST11: 

;j***v************+*******+++++*********k*********** ************* 

i*TEST U TEST UNCONDITIONAL CACHE BYPASS 

I UNCONDITIONAL BYPASS TEST THIS TEST Will VERIFY THAT WHEN CCR 
?BIT<9> IS SET. A MEMORY REFERENCE IS FORCED TO MAIN MEMORY. THIS 
iWILL ALSO VERIFY THAI READ AND WRITE HIT INVALIDATE THE CACHE 
;LOCATIONS WHEN BYPASS IS SET. 



TO SETUP POSSIBILITY OF HIT 



SET THEN' 



jBGNTST 

jREAD TEST LOCATIONS 

jSET CCR BIT<9> 

jHEAD FIRST TEST LOCATION 

l IF HIT/MISS REGISTER BIW> NOT 

j . ERROR IN CACHE SYSTEM 

iENOIF 

jWRITE SECOND TEST L.OCAIION 

j IF HIT/MISS REGISTER BIT<1> NOT 

; . ERROR IN CACHE SYSTEM 

iENOIF 

(CLEAR CCR B1T<9> 

j READ FIRST LOCATION 

j IF HIT /MISS REGISTER 

j . ERROR IN CACH* 

iENOIF 

jREAD SECOND I OCATION 

{IF HIT/MISS REGISTER BIT- 1 > SET THEN 

j. ERROR IN CACHE SYSTEM 



BIT<1> SJr.T 
SYSTEM 



SET THEN 



THEN 



GLOBAL 


AREAS 


MACU1 


30AC1052) 04-AI 


KDJ1J.A. 


MAC 05 -APR -84 


11:36 




1657 










1658 










1659 










1640 










1641 


004052 








1642 


004052 


005267 


174726 




164? 


004056 


005757 


001122 




1644 


004062 


005737 


001124 




1645> 


004066 


052767 


001000 


173652 


1646 


004074 


005757 


001122 




164 7 


004100 


052767 


000010 


173644 


1648 


004106 


001010 






1649 


004110 


012737 


004056 


001120 


1650 


004116 


004 76 7 


175516 




1651 


004122 


104000 






1652 


004124 


000026 






1655 


004126 


001525 






1654 










1655 


004150 


005037 


001124 




1656 


004154 


013705 


177752 




1657 


004140 


012704 


004154 




1658 


004144 


012702 


C01124 




1659 


004150 


042704 


177701 




1660 


004154 


042702 


177701 




1661 


004160 


020204 






1662 


004162 


001004 






1665 


004164 


052705 


000010 




1664 


004170 


001014 






1665 


004172 


000405 






1666 


004174 


052705 


000004 




1667 


004200 


001010 






1668 


004202 








1669 


004202 


012737 


004036 


001120 


1670 


004210 


004767 


175424 




1671 


004214 


104000 






167? 


004216 


000027 






1675 


004220 


001525 






1674 










1675 


004222 


005737 


001122 




1676 


004226 


032767 


000010 


173516 


167 7 


004254 


001410 






1678 


004256 


012757 


004056 


001120 


1679 


004244 


004 767 


175370 




1680 


004250 


104000 






1681 


004252 


000050 






1 682 


004254 


001325 






1685 










1664 


004256 


005057 


001124 




1685 


00426 2 


016705 


175464 




1686 


004266 


012704 


004262 




168/ 


004272 


012702 


001124 




1638 


0042 7b 


042704 


177/01 




1689 


004 502 


042/02 


177701 




1690 


004 506 


020204 






1691 


004 5. tO 


001004 






1692 


0043*2 


c^r/03 


000010 





!-84 10j38 PAGE 37 

Til TEST UNCONDITIONAL 



_3 



CACHE BYPASS 



SEQ 0037 



jENDIF 
ENDTST 

. +*** + + + + + * + + + ** + + * + + ***^ + + + +++*+*+ + + + * + * + *** + + + + + ** + + *** + ****** 
TSTU: 



U: 



100$ 



101$ 
102$ 



3$; 



4$ : 
200$ 



INC 

TST 

TST 

BIS 

TST 

BIT 

BNE 

MOV 

JSR 

ERROR 

.WORD 

.WORD 

CLR 

MOV 

MOV 

MOV 

BIC 

BIC 

CMP 

BNE 

BIT 

BNE 

BR 

BIT 

RNE 

MOV 

JSR 

ERROH 

.WORD 

.WORD 

TST 

BIT 

BEQ 

MOV 

JSR 

ERROR 

.WORD 

.WORD 

CLR 

MOV 
MOV 
MOV 
BIC 

tire 

CMP 
RNE 
BIT 



$TESTN 

BOTSTLOC 

80TSTLOC*2 

OBIT09, CCR 

B#TSTLOC 

O8IT03, HITMIS 

PS 

#TSTll*4,a#S0FTRE 
PC.APTSFT 

26 

ERRMSG 

30TSTLOC*2 

&0HITMIS.R3 

0100$ ,R4 

0TSTL0C*2,R2 

0177701, R4 

0177701, R2 

R2.R4 

101$ 

O8IT03, R3 

3$ 

102$ 

OBIT02.R3 

3$ 

*TSUlMi,80SOFTRE 
PC.APTSFT 

27 

ERRMSG 

SOTSTLOC 
0BIT03, HITMIS 
4$ 

0TSTU*4,J#SUFTRE 
PC.APTSFT 

30 
ERRMSG 

bWTSTLOC**? 

HITMIS, R5 

020o*,R<4 

OTSTl.0C*2,H2 

0177701. R4 

0177/01.R2 

R2.R4 

201$ 

OBIT03, R3 



INCREMENT TEST NUMBER 

ALLOCATE FIRST TEST LOCATION 

ALLOCATE SECOND TEST LOCATION 

SET CCR BIT 9 (CACHE BYPASS) 

READ FIRST TEST LOCATION 

IF HIT/MISS REG. BIT 3 NOT SET 

THEN 

MOVE RETRY ADDRESS TO SOFT RETURN 

GO TO SOFT ERROR SUBROUTINE. 

ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
WRiTE SECOND LOCATION 
SAVE CONTENTS OF HIT MISS 
MOV AODR UF MOV INST TO R4 

STRIP OT UNNEEUED BITS 

ARE THEY EQUAL? 

BRANCH P NOT 

IF HIT/MISS REG. BIT 3 NOT SET 

THEN 

IT WAS A MISS. GO TO ERROR 

TEST BIT02 

BRANCH ITF IT WAS A HIT 

MOVE RETRY ADDRESS TO SOFT RETURN 
GO TO SOFT ERROR SUBROUTINE 
ALL. ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 



ADDRE 



SS 



OF 



ERROR MESSAGE 

jCACHE SYSTEM ERROR 

READ FIRST TEST LOCATION 
T F HIT/MISS REG. BIT 5 SET 

THEN 



ADDRESS TO SOFT RETURN 

ERROR SUBROUTINE 

TO TRAP TO EMT VECTOR 



MOVE RETRY 

GO TO SOFT 

ALL ERRORS 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAbt 

jCACHE SYSTEM ERROR 
WRITE SfcCONO LOCATION 
SAVE CONTENTS OF HIT MISS REG 



ARE THEY EOUAl 
BRANCH IF NO! 
{IF HIT/MISS REG. 



BIT 3 NOT SET 



M5 



GLOBAL AREi 
KDJ11A.MAC 



MAC HI 30AU052) 
03-APR-84 11:36 



1693 
3.694 
1695 
1696 
1697 
1698 
1699 
1700 
1701 
1702 
1703 
1704 
1705 
1706 
1707 
1708 
1709 
1710 
1711 
1712 
1713 
1714 
1715 
1716 
1717 
1718 
1719 
1720 
1721 
1722 
1723 
1/24 
1725 
1726 
1727 
1728 
1 729 
1/30 
1731 
1 /32 
1733 
1734 
1735 
1736 
173/ 
/38 
/39 
/40 
741 
/42 
74 3 
1/44 
1/45 
1 /46 
1 /4 / 
1748 



004316 
004320 
004 322 
004326 
004 330 
004330 
004336 
004342 
004344 
004346 

004350 
004354 
004360 
004 364 
004370 



004374 



001414 
000403 
032703 
001410 

012737 

004 767 
104000 
000031 
001325 

005067 
005037 
005037 
005037 
000167 



000004 



004056 
175276 



173372 
177744 
177766 
001116 
000000 



04 -APR -84 
Til 



201$ 
202$ 



10s 38 PAGE-: 38 

TEST UNCONDITIONAL 



CACHE BYPASS 



SEQ 0038 



001120 



5$: 



BEQ 5$ 

BR 202* 

BIT 4BIT02.R3 

BEQ 5$ 

MOV 4TST11*4,SWS0FTRE 

JSR PC.APTSFT 

ERROR 

.WORD 31 

.WORD ERRMSG 

CLR CCR 

CLR tfflMSER 

CLR SWCPEREG 

CLR a^SOETER 

JMP TST12 



I THEN EXIT TEST 

ifclSEtEXPECTED A MISS GO TO IRROR 
:IF HIT/MISS REG. BIT 2 NOT SET 
I THEN EXIT TEST. ELSE GO TO ERROR 

;MOVE RETRY ADDRESS TO SOFT RETURN 
{GO TO SOFT ERROR SUBROUTINE 
{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
BYPASS BIT BEFORE EXIT 



•.CLEAR 
{CLEAR 
{CLEAR 
{CLEAR 
S JUMP 



THE MEM SY: ERROR REG 
THE CPU ERROR REGISTER 
THE SOF T ERROR COUNT 
OVER DATA TABLES OR SUBROUTINES 



TO NEXT TEST 



CTST12: 

♦TEST 12 TEST WRITE WRONG DATA PARITY 

WRITE WRONG DATA PARITY TEST- THIS TEST WILL VERIFY THAT WHEN CCR 
BIT<6> - 1 AND CCR BITSW.0> - 0,1, A READ MISS OCCURS AETER A 
WRITE. THE WRITE WITH CCR l»IT<6> ■ 1 TO A LOCATION WILL CAUSE A 
CACHE UPDATE AND WRONG PARITY TO BE WRITTEN SO WHEN THE LOCATION 
IS READ INSTEAD OE A HIT BEING RECORDED THE CACHE PARITY ERROR 
WILL CAUSE A CACHE MISS. THIS TEST WILL BE DONE A BYTE AT A TIME. 
NOTE i IE BOTH ERRORS OCCUR CCGA MOST LIKEL1 BAD. 
IF ONLY ONE ERROR OCCURS CCGA LEAST LIKELY. 

BGNTST 

SAVE CONTENTS OE VECTOR 114 
LET VECTOR 114 POINT TO ABORT ROUTINE 
CLEAR MSER 

IF MSER NOT CLEAR THEN 
{. ERROR IN CACHE SYSTEM 
END IF 

WRITE TEST LOCATION 
SET BITS<6,0> IN CCR 
WRITE TEST LOCATION LOW BYTE 
CLEAR CCR BIT<6> (WRITE WRONG DATA PARITY) 
INITIALIZE ERROR INDICATORS 
READ TEST LOCATION LOW BYTE 
IF BIT<1> SET IN HIT/MISS REGISTER THEN 

ERROR IN CACHE SYSTEM 
ELSE 



IF MSER BITS < 
ERROR IN CACHE 
END IF 



7:5> ZERO 
SYSTEM 



THEN 



ENOIF 

CLEAR MSER 
IF MSER NOT 



LNDII 
{SET CCR 



CLEAR IHEN 
ERROR IN 



CACHE SYSTEM 



B1T<6> 



N3 



GLOBAL ARIAS 
KD J 11 A, MAC 



1749 
1750 
1751 
1752 
1753 
17?A 
17.^5 
1756 
1757 
1758 
1759 
1760 
1761 
1762 
1763 
1 764 
1765 
1/66 
1767 
1768 
1769 
1770 
1771 
17 7? 
1773 
1774 



MACU1 30AC1052) 
03 -APR 84 11:36 



04 -APR -84 

T12 



10:38 PAGE 39 

TEST WRITE WRONG 



DATA PARITY 



SEQ 0039 



1775 
1776 

1777 
W78 
1779 
1780 
1781 
1782 
1 78 ^ 
1734 
1785 
1786 
178/ 
1788 
1789 
1 790 
1791 
1 792 
1 793 
1 794 
1 795 
1 /96 
1 /9/ 

i m 

I /99 

1800 
1801 
180,' 
180', 
1804 



004374 
004374 
004400 
004406 
0044 \4 
004420 
004424 
004426 
004430 
0044 32 

004434 
004440 

004446 
004454 
004462 
004466 
004474 
004476 
004504 
004510 
004512 
004514 

004516 

004 524 
004526 

004530 
00453? 

004534 
004 540 
004544 



005267 
013767 
012737 
005067 
005767 
001403 
104000 
000032 
001325 

005037 
012767 

112767 

042/67 
105737 
032767 
001410 
0127 37 

004 76 7 
104000 
000033 
001325 

032767 
001003 

104000 
0000 34 
001325 

00506/ 

005 /6 .' 
001403 



174404 
000114 
004706 
1/3324 
173320 



174422 
000114 



WRITE TEST LOCATION HIGH BYTE 

CLEAR CCR BIT<6> 

READ TEST LOCATION HIGH BYTE 

If BIT<1> SET IN HIT/MISS REGISTER 

ERROR IN CACHE SYSTEM 
ELSE 



THEN 



<7:5> ZERO THEN 

IN CACHE SYSTEM 



If MSER BITS 
ERROR 

ENDIF 
END IE 

RESTORE CONTENTS OF VECTOR 114 
IF ERROR INDICATORS SET THEN 

ERROR IN CACHE SYSTEM 
ENDIF 
EXIT TST 

DATA PARITY ABORT ROUTINE: 

ERROR IN CACHE SYSTEM 



J 



RETURN 



ENDTS 

; + + + + * + + + + + +* + + *** + + * + *** + ** + * + *+,+ + *** + + + + ***** + * + * + ** + * + + + + + + + + 

TST12: 



001122 14 

000101 173300 

000377 174446 

000100 1732C1 
001122 

000010 173256 

004400 001120 
175130 



000340 173220 2$ 



173204 

1 /3200 



3 5 



INC 

MOV 

MOV 

CLR 

TST 

BEQ 

PPROR 

.WORD 

.WORD 

CLR 
MOV 

MO\'B 

BIC 

T5TB 

BIT 

BEQ 

MOV 

J5R 

ERROR 
.WORD 
. WORD 

01! 

BNE 

ERROR 
.WORD 
.WORD 

Ct R 
I'-, I 
BEU 



$TESTN 

SOI 14, SLOCOO 

ODAPAB0.S0114 

MSER 

MSER 

1$ 

3? 
ERRMSG 

SOTSTLOC 
0101, CCR 

03/7. IS' X 

OBITOb, CCR 

S0TSTLOC 

0BIT03, HITrl.'S 

2$ 

OTSTl2*4.30SOFTRfc 

PC.APTSFT 

33 

ERRMSG 



340, 
3$ 

34 
ERRMSG 



MSER 
MSER 
4$ 



MSER 



j INCREMENT TEST NUMBER 

; SAVE CONTENTS OF VECTOR 114 

;LET VECTOR POINT TO ABORT ROUTINE 

{CLEAR MSER 

{IF MSER NOT CLEAR 

;THEN 

{ALL ERRORS TO trap TO F.MT VECTOR 

; UNIQUE ERROR NUMBER 

{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 

WRITE TEST LOCATION TO ALLOCATE CACHE 

SET BIT$<6,0> IN CCR 

WRITE WRONG DATA PARITY j IGNORE PARITY INTERRUP 

WRITE LOW BYTE WITH BAD PARITY 

CLEAR WRITE WRONG DATA PARITY BIT 

READ LOW BYTE OF TEST LOCATION 

EXPECT A MISSj IF BIT 3 SET IN HIT/MISS REGISTE 

THEN! 

MOVE RETRY ADDRESS TO SO T RETURN 

GO TO SOFT ERROR SUBROUTINE 

ALL ERRORS TO TRAP TO CM VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

{CACHE St STEM ERROR 

IF MSER BITS <7:5> ZERO 

THEN 

ALL ERRORS TO TRAP (0 CUT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS C ERROR ri.SSACE 

j CACHE Si STEM ERROR 

CLEAR MSER 

I* MSER NOT CLEAR 
j THEN 



R4 



GLOBAL ARE; 
KOJUA.MAC 



1605 

1806 
lao: 

1808 
180<* 

ieio 

181 1 

1812 
1615 
1814 
1815 
1816 
181 ; 
1818 
181^ 
1820 
1821 
162? 
1623 
1824 
1825 
1826 
182/ 
1828 
1829 
1830 
1831 
1832 
1835 
1834 
183b 
1836 
183/ 
1838 
1834 
1840 
1841 
1842 
184 5 
1844 
1845 
1846 
164 7 
1848 
1844 
1650 
1851 
1852 
185^ 
1854 
1855 
1856 
185.' 
1858 
16'. 4 
I860 



004546 

004550 
004552 

004554 
004562 
0045^0 
004576 
004602 
00*610 
004612 
004620 
004624 
004626 
004630 

0046 32 
004634 
004642 
004644 
004646 
004650 

00^652 
004660 
004 666 
004666 
004672 
0046 76 
004 702 



004 706 
004 706 
004/10 
004/12 



MAC ill 50AI 1052) 
03 APR 84 Ut 36 

104000 
000035 
001325 



04 



APR 84 

T12 



10 {38 PAGE. 40 

TEST WRITE WRONG 



DATA PARITY 



052767 
112/37 
042 767 
105737 
032767 
001411 
012/3/ 
004 76 7 
104000 
000036 
001525 

00040 7 
032767 
001003 
104000 
00003/ 
001325 

01276/ 
016737 

00503 7 
005037 
005037 
000167 



104000 
000040 
001 j?5 



004 714 000002 



004 716 



000100 
0003 7/ 
000100 
001123 
000010 

004400 
175014 



000400 
174144 

177744 
177766 
001116 
000010 



1/3164 
001123 
W3150 

173142 

001120 



1/3066 
000114 



4*j 



000340 173102 51s 



6i: 
'Mi 



DAPABO: 



CT5T13: 



ERROR 
.WORD 

.WORD 

BIS 

MOVB 

BIC 

T5TB 

OIT 

BLCJ 

MOV 

J5R 

ERROR 

.W0«0 

.WORD 

BR 

BIT 

BNE 

ERROR 
.WORD 
.WORD 

MOV 
MOV 

CL.R 

CL.R 
CLR 
JMP 



ERROR 

.WORD 
.WORD 

RTI 



35 
FRRMSG 

*fiIT06, CCR 

#3/7, S0TSTL0O1 

•UIT06, CCR 

B*TSTL0C»1 

*6IT03. HITMIS 

51 

*TST12*4,B#S0FTRt 

PC.APTSFT 

36 
ERRM5G 

6$ 

#340, MSER 

61 

37 
ERRMSG 

0BITO8.CCR 

siocoo, aoii4 

S0MSER 

B0CPEREG 
SOSO TER 
TST13 



40 
ERRMSG 



SECJ OOAO 



ALL ERRORS TO TRAP TO F.MT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS Of ERROR MESSAGE 

iCACHF SYSTEM ERROR 
SET CCR BIT 6 (WRITE. WRONG PARITY) 
WRITE HIGM BYTE OT TEST LOCATION 
CI FAR WRITF WRONG PARITY BIT 
READ HIGH BYTE OF TF.ST LOCATION 
IE BIT 5 SET IN HIT/MISS REGISTER 
THEN 

HOVE RETRY ADDRESS TO SOFT RETURN 
GO TO SOFT ERROR SUBROUTINE 
ALL ERRORS TO TRMP TO EKT VECTOR 
UNIQUE ERROR NUMBER 
ADDRFSS Of ERROR MESSAGE 

l CACHE SYSTEM KRRO« 
GO TO NEXT TEST IF NO HALT ON ERROR 
IF BITS <7 : 5> /FRO 
THEN 

ALL ERPORS TO TRAP TO F.MT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OT ERROR MESSAGE 

iCACHE SYSTEM ERROR 
rLUSH CACHE, CLEAR CCR BEFORE EXIT 
RESTORE CONTENTS Of" VECTOR 114 

CLEAR THE MEM STS t'RROR REG 

CLEAR THE CPU ERROR REGISTER 

CLEAR THE SOT T ERROR COUNT 

JUMP OVER DATA TABLES OR SUBROUTINES 

TO NEXT TEST 



AIL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NL^BER 
ADDRESS OF ERROR ME SsAGt 

iCACHE SYSTEM ERROR 



*TEST 13 



TfST WRITE WRONG TAG PARITi 



WRITE 
OCCURS 
TO TNT 
WRITTE 
Of A C 
MISS. 



WRONG TAG PARITY THIS TEST WILL VERIFY THAT A READ MISS 

AFTER <* WRITE WILL CCR<10> • 1 AND CCR<7,0» - C,l. THE URITt 
LOCATION WILL CAUSE A CACHE. UPDATE BUT THE TAG Will Bt~ 
N WITH THE WRONG PARITY. WHEN THE. LOCATION 15 Ul AO INS HAD 
ACHE HIT OCCURRING THE PARITY ERROR SHOULD CAUSE A CACHE 



HGNTST 

'".AVE CONTFNTS QF VECTOR 114 
IM VECTOR 114 POINT TO AUURT 
CLEAR MSER 



KOUTINL 



GLOBAL arias 
kDjila.mac 



C4 



os^k^m*' M APR - 



n l0, ?f S T P («!Tt 



WRONG TAG PARITY 



SEU 0041 



1861 
1862 

1864 
1865 
1866 
186 * 
1868 
1»6* 
18/0 

i8;i 

18/2 

18 ;5 

18/5 

la/* 

18/7 

18/8 
187<4 

1880 
1881 
1882 
1885 
1884 
1885 
1886 
188 7 
1888 
1889 
1890 
1891 
189c 5 
1893 
1894 
1895 
1896 
189/ 
1896 
1899 
19O0 
1901 
ISO. 1 
1905 
1904 
1905 
1906 
190/ 
1908 
1909 
1910 
1911 
1912 
191 5 
1914 
191S 
1916 



004/16 
004 716 



004 7c"?? 
004750 
004 736 
004 742 
004 750 
004/54 
004 762 
004 766 
004 7 74 
004 7 76 
005004 
005010 
005012 
005014 

005016 
005020 
005020 
00502.? 
005024 

005026 
005034 
005042 
005046 
005052 
005056 



005062 
005062 
005064 

005066 



005267 174062 



013767 
012737 
005067 
012767 
005037 
012767 
0057 3 7 
032767 
001414 
012737 
004 76/ 
104000 
000041 
001325 

000403 

104000 
000042 
001325 

012767 
016737 
00503 7 

005037 
00503 7 
000167 



104000 
00004* 
001325 



000114 
005062 
17 3002 
002001 
001122 
000001 
001122 
000010 

004 722 
174650 



000400 
173770 
177744 
1 7 7 766 
001116 
000010 



174100 
000114 

172776 

172764 

172756 

001120 



W2712 
000114 



SET WRITE WRONG. TAG PARITY BIT*tO> 

WRITE TEST LOCATION 

CLEAR CCR BIT<*i0> AND SET ABORT DISABLE BIT<0> 

READ TEST LOCATION 

IE BIT<1> SET IN HIT/MIS5 REGISTER THEN 

ERROR IN CACHE SYSTEM 
ELSE 

ERROR IN CACHE SYSTEM 
ENOIF 

RESTORE VECTOR 114 
EXIT TST 



TAG PARITY ABORT ROUTINE: 



ENOTST 



J 



ERROR IN 
RETURN 



CACHE SYSTEM 



T3T13: 

INC ITESTN 

********************** NOTE ***** 

DON'T SINGLE STEP THIS C "»{) -. US 
PARITY ERRORS WILL OCClfl . 

************** ******************* 



l INCREMENT Tf-.ST NUMBER 

******♦****♦*• ».***.* ♦ 
ING THE ODT P COfWNO! M 



15s 



aw 



TAP ABU; 



MOV 


B0114, SLOCOO 


MOV 


•TAPABO.S*! 14 


CLR 


MSER 


MOV 


•2001, CCR 


CLR 


I39TSUOC 


MOV 


•BITOO, CCR 


TST 


SdTSTLOC 


BIT 


♦B1T03. HUNTS 


BEQ 


21 


MOV 


•TST13*4,B*SCF7PE 


JSR 


PC, APTSFT 


ERROR 




.WORD 


41 


.WORD 


ERRMSG 


BR 


2$ 


ERROR 




.WORD 


42 


.WORD 


ERRMSG 


MOV 


•BIT 08, CCR 


MOV 


SLOCOO, 8*114 


CLP 


W0MSER 


CLR 


30CPERFG 


CLR 


M»SOF TER 


JMP 


TST1*4 


f-RROR 




t WORO 


4 3 


.WORD 


ERRMSG 



VECTOR 114 

TO ABORT ROUTINE 



**.**.* + **«*+*«* + ** + + « 

SAVE CONTEND it 

LET VECTOR POINT 

CLEAR MSER 

SET WRITE WRONG TAG PARITt £ NO PARITY 

WRITE LOCATION WITH tfAO TAG PARITr 

CLEAR BIT 10 ANO SET NO PARITY INTERRUPTS 

READ TEST LOCATION 

I*" BIT 3 SFT IN HIT /MISS REGISTER 

THEN 

MOVE RETRY ADDRESS TO SOFT RETURN 

GO TO SOf T ERROR SUBROUTINE 

ALL ERRORS TO TRAP TO EMT VECTOR 

LMIQUe ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

I CACHE SYSTEM ERROR 
ELSE 

ALL ERRORS TO TRAP TO EMT VECTOR 
LUIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 

i CACHE SYS1FM ERROR 
FLUSH CACHE, CLEAR CCR BEFORE EXIT 
RESTORE CONTENTS Of" VECTOR 114 
CLEAR THE MEM SYS ERROR REG 
CI EAR THE CPU ERROR REGISTER 
CLEAR THE SOf T ERROR COl>NT 
JUMP OVER DATA TABLES OR SUBROUTINES 
TO NEXT TEST 



Ail ERRORS TO TRAP \0 EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MLSSAGt 



INTERRUP 



GLOHAl AH (AS 

kOjiia.mac 



D4 



os"u i ^m% 



W) 



04 -APR -04 



l0 '?g S T P ()lft 



TpWRONG 



TAG PARITt 



SEQ 0042 



191 ; 

I'M* 
1919 

1920 
1921 

1923 
1 ^24 
1925 
1926 

192: 

192 8 
192^ 
1930 
1951 
1.9?.' 
J. 95? 
1954 
1935 
1936 

19?; 

1938 
1959 
1940 
1941 
194? 
1943 
1944 
194 r . 
1946 

194 7 
l^ti 
1949 
1**50 
19M 

1952 

1957 
1954 

195 , 
1900 
195 ' 
1950 
1959 
1960 
1961 
1962 

1 96 *; 

l*i4 

19tj5 
19f,6 
19r! V 
196i* 
1969 
3 9 /O 
1 9 / \ 



005070 00000, 



00507.? 



RTI 



I CACHE SYSTEM ERRUR 



\.'' "2 

c»G'S\ ■ , : rs 
oc>uv 

CvV 10 

^■'" , .i-.. , o 

o v.. i4C 
»u . .50 

*.'■):.» 10*. 

0*'51G4 



00526 7 

004 767 

01276 7 
01273 7 

052767 
005001 
052767 
00507 7 
00506 7 
0050 5 7 
013/67 
01273' 
00510?. 



1/3 706 
174310 

001600 
14000C 

000001 

000100 

173762 
17260? 
1/7/4* 
000114 
005244 



165244 
001122 

172446 

172612 



1M652 
000114 



CTSU5: 



♦TEST 14 



TF.ST PARITY INTERRUPT 



PARITY INTERRUPT TEST - THIS TEST WILL VERIFY THAT WHEN CCR<7,0> 
0,0, A PARITY INTERRUPT OCCURS AFTER EXECUTION OF AN INSTRUCTION 
THAT HAS BEEN WRITTEN WITH WRONG PARITY. 



BGNTST 

SAVE CONTENTS OF 114 
SETUP VECTOR 114 TO POINT 
CLEAR EXPECTING INTERRUPT 



TO INTERRUPT 
FLAG 



ROUTINE 



WRITE TEST ADDRESS WITH 



BAD PARITY 

FLAG 



SET EXPECTING INTERRUPT 

READ TEST ADDHESS 

IF INTERRUPT FLAG NE THEN 

ERROR IN CACHE SYSTEM 
ENOIF 

RESTOkE CONTENTS OF VECTOR 114 
EXIT TST 



INTERRUPT ROUTINE,* 



IF EXPECTING INTERRUPT FLAG NE 1 THEN 

ERROR IN CACHE SYSTEM 
ELSE 

CLEAR (EXPECTING) INTERRUPT FLAG 
END IF 
IF SAVED PC Nh TU UPUAftO PC IHtN 

ERROR IN CACHE SYSTEM 
ENOIF 
IF MSER NE 340 THEN 

ERROR IN CACHE SYSTEM 
ENOIF 
RETURN 



ENOTST 
TST14; 



INC ITESTN 

JSR PC.INLTMM 

MOV 01600, KIPAR6 

MOV 0140000, M^TSTLOC 

eis oeiToo,sRo 

CLN Rl 

BIS OflITOt>, CCR 

CLR 8TST1.0C 

Ct R CCR 

CLR 30MSER 

MOV 6)0114, SLOCOO 

MOV OINTERR»WOU4 

COM Rl 



NUMBER 

ZERO REFERENCES WILL 



INCREMENT TEST 

INIT MMUj PAGE 

BYPASS CACHE. 

SET PAR6 [0 RELOCATE TO BANK / 

SET UP TEST LOCATION TO 06TAIN 

PHYSICAL ADDR VIA KIPAR6. 

TURN ON MMU 

CLEAR EXPECTING INTERRJPT MAG 

SET WRITE WRONG DATA PARITY 

WRITE CACHE LOCATION WITH HAD DATA PARTTi 

CLEAR WRITE W«ONG DATA PAKIM 

INIT MSER 

SAVF CONTENTS 0> VECTOR 114 

LIT VICTOR POINT TO INTERRUPT 

St T EXPECTING INTERRUPT HUG 



ROUTINE 



4 



Gl OHAi. Artl AS 
KDJUA.MAC 



rlACUl 30AU052) 
03-APR-84 11:36 



04 



1973 
197«i 
19/5 
19/6 

19;/ 

1978 
19/9 
l'.MO 
198). 
1985 
1965 
1980 

I9sr» 

: 98b 

198 7 
19»8 
198* 
1990 
1991 
1995 
199? 
1994 
1 995 
1996 
199/ 
1.998 
1999 

2000 

5001 
500.? 
5003 
5004 
200b 
5006 

500 V 
5008 
500 ( > 
5010 
5011 
5015 
5013 
50 i 4 
501 5 
5016 

501 / 
501 8 
5019 
5050 
50. '1 
5055 

;:05 5 

5054 
5iV ,c , 

505-, 

5028 



0051 66 
00:11 75 

00:) 174 
005176 
005200 
005505 

005204 
005515 
C05516 
005554 
005 5*0 
00*3554 
005240 



005244 
005246 
.W50 
0^5255 
005254 

005556 

005560 
003565 

005266 

0055 /o 

005275 
005574 

005276 

005504 
00530*=. 

O0S3:0 
005315 



0057 7 7 
005 701 

001403 
104000 
U 0004 4 
001355 

016737 

005067 
015737 
005037 
005037 
005037 
000167 



005701 
001004 
104000 
000045 
001325 

000401 

005001 
021657 
001403 
104000 
000046 
001325 

02276? 

001403 
104000 

00004 7 
001355 



005314 000002 



005.S16 



173730 



173620 
172354 
000400 
177744 
177 766 
001116 
000052 



000114 
177746 



005172 



000340 172440 



APR 84 10 


j 38 PACr 4 3 




T14 


TF.5T PARITY INTERRUPT 


INTRPCi 


TST 


BTSTLOC 






TST 


Rl 






BEQ 


1* 






ERROR 








.WORD 


44 






.WORD 


ERRMSG 




4 IS- 


HOV 


SLOCOO, 


8*114 




CLR 


SRO 




6 


MOV 


OBIT08.8&CCR 




CLR 


aOMSER 






CLR 


80CPEREG 




CLR 


S*SOFTER 




JMP 


TST15 




INTERR: 


TST 


Rl 






BNE 


1* 






ERROR 








.WORD 


45 






.WORD 


ERRMSG 






BR 


5$ 




H: 


CLR 


Rl 




2*i 


CMP 


8SP, 


0INTRPC*4 




BEO 


4$ 






ERROR 








.WORD 


46 






.WORD 


ERRMSG 




4$j 


CMP 


*340, 


MSER 




BEQ 


5* 






ERROR 








.WORD 


4 7 






.WORD 


ERRMSG 





5$ 



RTI 



SEQ 0043 



READ TEST LOCATION} SHOULD GET PARITY INTERRUPT 

RETURN HERE FROM INTERRUPT 

IF INTERRUPT FLAG NOT EQUAL ZERO 

THEN WE DIDN'T GET A PARITY INTERRUPT. 

ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

tCACHE SYSTEM ERROR 
RESTORE VECTOR 114 
TURN OFF MMU 
FLUSH CACHE # CLEAR CCR 
CLEAR THE MEM SYS ERROR PEG 
CLEAR THE CPU ERROR REGISTER 
CLEAR THE SOFT ERROR COUNT 
JUMP OVER DATA TABLES OR SUBROUTINES 
10 NEXT TEST 

IF EXPECTING INTERRUPT FLAG NOT SET 

THEN 

ALL ERRORS TO TRAP TO FMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS Of ERROR MESSAGE 

jCACHE SYSTEM ERROR 
ELSE 

CLEAR (EXPECTING) INTERRUPT FLAG 
IF SAVED PC NOT EQUAL TO UPDATED PC 
THEN 

ALL ERRORS TO .'RAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 

iCACHE SYSTEM ERROR 
IF MSER NOT EQUAL TO EXPECTED VALUE 
THEN 

ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 

j CACHE SYSTEM ERROR 
RETURN 



CTST17: 

»*TEST 15 TEST THAT PARITY ERRORS BLOCKED BY NXM ABORT 

jCHECK PARITY ABORTS BLOCKED BY NON-EXISTENT MEMORY ABORT - THIS TEST WILL 
iVERIFY THAT IF A PARITY ERROR OCCURS ON THE SAME ADDRESS REFERENCE AS A 
{NON-EXISTENT MEMORY ERROR THAT THE CACHE DATA PATH GATE ARRAY BLOCKS THE 
jPARITY ERROR TO THE J-ll CHIP SET. THIS WILL BE DONE BY USING THE DIAGNOSTIC 
•BIT TO CAUSE A PARITY ERROR IN A CACHE REFERENCE THAI DOES NOT HAVE A 
» CORRESPONDING ADDRESS IN MAIN MEMORY. THE ADDRESS WILL THEN BE READ CAUSING 
jOOTH A CACHE PARITY ERROR ANO A NON EXISTENT MEMORY ERROR. TO AVOID HAVING 
j TO SIZE THE ENTIRE MEMORY TO FIND A NON-EXISTENT MEMORY ADDRESS THIS TEST 
jWILL USE THE LARGEST NON I/O ADDRESS (1 7757776). 1 HE TEST WILL FIRST READ 



i THIS ADDRESS AND IF A NXM TRAP OCCURS THE TEST WILL BE DONE. 
j TO THIS ADDRESS DOES NOT TRAP THEN THE TEST WILL BE SKIPPED. 



IF THE ACCESS 



G4 



GLOBAL AREAS 
KD J 11 A.MAC 



,'085 
20P6 

?oa ; 

2088 
2089 
20 to 
2091 

2092 
2093 
2094 
209S 

209; 

2098 
2099 
2100 
2101 
2102 
210? 
2104 
21 01) 
2106 
210? 
2108 
2109 
2110 
2111 
2112 
211? 
2114 
2115 
2116 
2117 
211£ 
2119 

2120 
2121 
2122 
2i2.: 
2124 
212!) 
2126 
212 V 
2128 
2129' 
2130 
2131 
;-M 32 
2134 
2134 
21 3: j 
2136 

2i *.: 

2 1 '.8 

21 V* 
2140 



oosiv; 

0054 j6 

00546."' 

0054 b/' 
00"? 4 .'0 

ec5n 

COS 1 . 1 '." 
005506 
00:,: ? .i2 

0055 V- 
005522 



005526 



MACU1 


30AC1052) 


04 


-APR-04 


10 {38 PAGE 45 


05 -APR -84 


11:36 






T15 


TEST THAT PARITY ERRORS BLOCKED 


000051 










.WORD 


51 


001525 










.WORD 


ERRMSG 


062 706 


000004 






2$: 


ADD 


»4, SP 


005067 


172256 






3$; 


CLR 


CCR 


C10437 


000004 








MOV 


R4, 6)04 


016737 


173330 


000114 




MOV 


SLOCOO, SWU4 


005067 


172064 








CLR 


SRO 


005037 


177744 








CLR 


a*MSER 


O05O37 


177766 








CLR 


QOCPEREG 


005037 


001116 








CLR 


SOSOFTER 


000167 


000000 








JMP 


TST16 



BY NXM ABORT 

{UNIQUE ERROR NUMBER 

l ADDRESS OF ERROR MESSAGE 

l CACHE SYSTEM ERROR 
{RESET STACK AFTER TRAP 
{CLEAR CCR FOR EXIT 
jRESTORE VECTOR 4 
(RESTORE VECTOR 114 
} TURN OFF MMU BEFORE EXITING, 
j CLEAR THE MEM SYS ERROR REG 
I CLEAR THE CPU ERROR REGISTER 
{CLEAR THE SOFT ERROR COUNT 
{JUMP OVER DATA TABLES OR SUBROUTINES 
{TO NEXT TEST 



CTST20: 

********+***+4************************+******++*4************** 



SEQ 0045 



♦TEST 16 



TEST MULTIPROCESSING INSTRUCTIONS 



ALLOCATE AN ADDRESS IN CACHE 
ENABLED ANO THE SAME ADDRESS 
WILL SET UP CACHE WITH DATA 1 
2. FORCE CACHE MISS UILL THEN 



UITH 
WILL 

ANO 

BE 



*********************** *4************4***444************ ******* 

KULTIPROCCESSING INSTRUCTION TESTS - THIS TEST WILL VERIFY THAT THE MvJLTI- 

PROCCESSING INSTRUCTIONS DO A BYPASS OF THE CACHE, THIS TEST WILL NOT VERIFY 

THE REST Of THE FUNCTIONALITY OF THESE INSTRUCTIONS BECAUSE THAT WILL ALREADY 

HAVE BEEN CHECKED IN THE BASE INSTRUCTION TESTS. 

THE TEST FOR TSTSET ANO WRTLCK WILL FIRST 

KNOWN DATA, THEN FORCE CACHE MISS WILL BE 

BE WRITTEN WITH WITH DIFFERENT DATA, THIS 

IT'S ASSOCIATED MEMORY LOCATION WITH DATA 

DISABLED ANu THE TSTSET/WRTLCK INSTRUCTION WILL EE EXECUTED, THIS INSTRUCTION 

WILL CAUSE CACHE TO BE BYPASSED ANC AN ACCESS TO MAIN MEMORY WILL BE MAOF . IN 

ADDITION THIS INSTRUCTION WILL CAUSE CACHE TO BE RE -ALLOCATED WITH THE CORRECT ;DATA 

THE TEST FOR ASRB INSTRUCTION DIFFERS SLIGHTLY. FIRST THE CACHE WILL BE 

ALLOCATED, THEN AN ASRB INSTRUCTION WILL BE DONE i\ r THAT ADDRESS. 

A HIT SHOULD BE RECORDED ON THE ACCESS. NEXT, THE ADDRESS WILL BE READ AND 

A MISS SHOULD BE RECORDED BECAUSE THE FORCED BYPASS ON THE ASRB INSTRUCTION 

SHOULD HAVE INVALIDATED THE CACHE ENTRY, AND BECAUSE IT'S A BYTE WRITE; CACHE 

WILL NOT BE RE-ALLOCATED. 

***** NOTE***** 
IF THE TSTSET OR WRTLCK ISTRUCTIONS ARE ASSEMBLED SO THAT BITS 

5-0 OF THE ADDRESS OF THE INSTRUCTION FOLLOWING THE TSTSET/WRTLCK INSTRUCTION 
ARE EQUAL TO BITS 5-0 OF THE TSTLOC ADDRESS THE TEST WILL FAIL. THIS IS CAUSED 
BY THE NEED OF AN ADDITIONAL FETCH WHEN THE PRE -FETCH BUFFER IS INVALIDATED 
WHEN BITS 5-0 OF AN ADDRESS WRITTEN TO ARE EQUAL TO BITS 5-0 OF THE ADDRESS 
IN THE PREFETCH BUFFER. THE ADDITIONAL FETCH CAUSES THE REQUIRED DATA TO BE 
SHIFTED OUT OF THE RANGE OF THE HIT/MISS REGISTER. PADDING THE FRONT OF THE 
TEST WITH NOPS MAY BE REQUIRED TO REMEDY THIS PROBLEM. 
BGNTST 

READ TEST LOCATION TO ALLOCATE CACHE 
DO TSTSET INSTRUCTION 
IF HIT/MISS REGISTER BIT 5 NOT SET THEN 

ERR03 IN CACHE SYSTEM 
END IF 

READ TEST LOCATION 
IF HIT/MISS REGISTER BIT 3 SET THIN 

ERROR IN CACHE SYSTEM 
END IF 



-14 



GLOBAL MR I AS 
KD J U. A. MAC 



.'1.41 
2142 

^H4 
2145 
214t> 

2i\: 

2148 

2150 

2151 

2152 
2153 

2154 

2155 

2 1 56 

215/ 
2! 5a 

2159 
2160 
2161 



MACU1 30AC10S2) 
05 APR 64 11:36 



04 -APR -64 10s 38 PAGE 46 

T16 TEST MULTIPROCESSING 



INSTRUCTIONS 



SEQ 0046 



2163 

2i6<; 

2lb5 

2166 
216.' 
2168 
2164 
2 1/0 
21 VI 
21/2 
21 /3 
.". 1 74 
2175 
2176 
21// 
21/6 
21 /4 
21 HO 

2iai 

2 1 H;> 
2185 
21ft4 
21iiS 
216h 
218 ' 
2 LrtH 
21K4 
2140 
21'il 
2142 
214- 
21'*4 
2 i'.»'. 



005 :> "6 
Co 



>r V 



'W.5J2 

005 5 3o 
C0554 4 



oo:j j l > .. 

0O560 
0055': 2 
OO'v'if.l 
0055/2 
00557 <*♦ 
005 702 
OoSbOti 
00;>>V 

oosr-ia 



0\'5-,}4 

00562* 
005nl6 

00 b' ,20 



005? 



><■'< 



00562 A 

<\>5c;;;- 

025a«*2 
1 .' w > * i •* 
Ou iv.'v 
00 v. ,'-,, 
005660 



005267 
005067 
012767 
012737 



007237 
COM2? 
001415 
032/67 
001014 
012737 
004 76 7 
104 000 
000052 
001325 



000403 

104000 
000055 
001325 



032767 

On io 14 
012/5/ 
004/6/ 
104 00 
0COO54 



173252 
173364 
000004 
177777 



1 /2202 
001122 



005552 005037 177746 



000040 172160 

005532 001120 
174032 



000020 172110 

005532 001120 
173/02 



READ TEST LOCATION TO ALLOCATE CACHE 

DO WRTLCK INSTRUCTION 

IF HIT/MISS REGISTER BIT 3 NOT SET THEN 

ERROR IN CACHE SYSTEM 
ENDIF 

READ TEST LOCATION 
IF HIT/MISS REGISTER BIT 3 SET THEN 

ERROR IN CACHE SYSTEM 
ENDIF 

READ TEST LOCATION TO ALLOCATE CACHE 

DO ASRB INSTRUCTION 

IF HIT/MISS REGISTER BIT 3 NOT SET THEN 

ERROR IN CACHE SYSTEM 
ENDIF 

READ TE5T LOCATION 
IF HIT/MISS REGISTER BIT 3 SET THEN 

ERROR IN CACHE SYSTEM 
ENDIF 
ENDTSI 

TST16: 

INC 1TESTN 

CLR TSTLOC 

MOV *BIT02,CCR 

MOV 0177777, SOTSTLUC 



CLR 


80CCR 


I 


TSTSET TSTLOC 


.WORD 


7237 


.WORD 


TSTLOC 


BEQ 


100$ 


BIT 


03ITO5.HITMIS 


BNE 


1$ 


MOV 


MST16*4,atfS0FTRE 


JSH 


PC,APTSFT 


ERRUH 




, WORD 


52 


.WORD 


ERRMSG 



BR 



100$; 



1$ 



02276/ 1777/7 173270 1$: 
001015 



ERROR 




.WORD 


53 


.WORD 


ERRMSG 


CMP 


01//777, TSTLOC 


BNE 


200$ 


BIT 


4BIT04. HITMIS 


HNt 


2$ 


MQV 


^T!iTlt..4,a#SUF*TRt 


JSR 


PC.APT5FT 


tRROR 




. WORD 


54 



INCREMENT TEST NUMRFR 

WRITE TEST LOCATION TO ALLOCATE CACHE 

SET CACHE TO FORCE MISS 

WRITE TO MEMORY BUT NOT TO CACHE. 

CACHE-OOOOOOi TSTL0O177777 

CLEAR FORCE MISS 

iDO TSTSET INSTRUCTION 
THESE NEXT TWO LOCATIONS ARE THE TSTSET 
INSTR. BECAUSE THE ASSEMBLER WAS NOT READY 
IF - THEN CACHE WAS NOT BYPASSED 
IF HIT/MISS REGISTER BIT 5 IS SET 
THEN GO TO NEXT TEST. 
MOVE RETRY ADDRESS TO SOFT RETURN 
GO TO SOFT ERROR SUBROUTINE 
ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRFSS OF FRROR MESSAGE 

;CACHC SYSTEM ERROR 
ERROR! BIT 5 IN HIT MISS REG WAS NOT SET. 
RECOVER FROM ERROR 

ALL ERRORS W TRAP TO FMT VECTOR 
UNIQUE. ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 

iCACHE SfSTEM ERROR 
ERROR! CACHE WAS NOT BYPASSED BY TSTSET 
READ TEST LOCATION (ALSO ALLOCATES CACHE FOR WR 
CACHE. SHOULD BE RE ALLOCATED WITH 
1/7/77 AS A RE.SU. T OF TSTSET INSTRUCTION. 
IF h: t /M1SS REGISTER BIT 4 SET l SMOU BE } 
THEN 

MOVE RETRY ADDRESS TO SOFT RE TORN 
GO TO SOFT ERROR SUBROUTIN* 
All FRRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 



14 



U.GUAl 


AW AS 


MACU1 


30AC1052) 04 -Al 


KDJ11A, 


MAC 


i-APR 84 


1 1 \ 36 




21*7 


005662 


001525 






2198 










2199 


00566** 


000405 






2200 


00So6( : . 








2201 


005666 


104000 






2202 


oosr /0 


000055 






2205 


00 ib V 2 


001525 






2204 










2205 










?.?06 


005b .'4 


0.12767 


0000C4 


172044 


2207 


0j5702 


00506 7 


173214 




220a 


-.■05706 


005000 






2209 


oosno 


00506 7 


172032 




2210 










2211 


00571.4 


00/53? 






22 12 


005/16 


021 122 






221/ 


O0572<"' 


0J1015 






2214 


005722 


052767 


000040 


172022 


2215. 


0:':')7^0 


001014 






2216 


005 7 32 


012757 


005532 


001120 


2217 


0057*0 


004 76 7 


173674 




2218 


005/44 


104000 






2219 


005 >4* 


000056 






2220 


005750 


001325 






2221 










2222 


0057: 2 


000405 






222: 


005/54 








2224 


OG5754 


104000 






2225 


005. 5-: > 


O00C5 / 






t- 4. «_0 


003/60 


001325 






« - t. c. ' 

2228 










222^ 


ou r i '■>,;.' 


00 : 76 7 


173154 




2250 


005766 


001015 






2251 


0057 '() 


52/67 


000020 


171754 


2252 


oos //,;. 


001014 






2255 


006000 


0\2, ! 37 


005552 


001120 


2254 


OOW'i* 


004 767 


173626 




225!) 


oo<-,oi;» 


104000 






2256 


00t)0i ■; 


000060 






225/ 


0060\6 


0v'» 1 325 






?.<">% 










^ ( \W 


006020 


000403 






2240 


0060= 2 








224 1 


006' )2 


i. 04 COO 






22 V 


ootiOjyi 


000061 






22*3 


006026 


001325 






2244 










224 S 










2246 


00*1050 


00576 y 


173066 




224 / 


O0ti03-* 


000240 






2248 


0060 V. 


?.0626 / 


173060 




2249 


OOhi'W - 


«:32 '6/ 


000020 


i a/02 


2250 


oot-or.o 


001010 






2251 


00 d !.."».■• 


*' 12/3 7 


0055 32 


001120 


2252 


oObOoO 


004/6/ 


1/3554 





:-84 

T16 



200$ 



10} 58 PAGE 4 7 

TEST MULTIPROCESSING 



INSTRUCTIONS 



SEQ 004 7 



2$ 



300$: 



3$: 



400$ 



4$: 



.WORD 
BR 

ERROR 

.WORD 
.WORD 



MOV 

CLR 

CLR 

CLR 

WRTLCK 

.WORD 

.WORD 

BNE 

BIT 

BNE 

MOV 

JSR 

ERROR 

.WORD 

.WORD 

BR 

ERROR 
.WORD 
.WORD 



rlOV 
JSR 

ERROR 
.WORD 
.WORD 

BR 

ERROR 
.WORD 
.WORD 



Tsr 

NOP 

A5RH 

HIT 

BNE 

MOV 

JSR 



ERRMSG 
2$ 



55 
ERRMSG 



OBIT02.CCR 

TSTLOC 

RO 

CCR 

TSTLOC 

7357 

TSTLOC 

300$ 

0EIT05, HITMIS 

31 

0T5T16*4,5)rtS0FTRE 

PC.APTSFT 

56 
ERRMSG 

3$ 



57 
ERRMSG 



TSTLOC 

400$ 

0BIT04, HITMIS 

4$ 

«TSTl6*4 t a#S0n'RE 

PC.APTSFT 

60 
ERK.1SU 

4$ 



61 

ERRMSG 



TSTLOC 

rsn oc 

0BIT04, HITMIS 

5$ 

OTS! 16*4,W0SOFTRE 

PC.AP15FT 



{ADDRESS Of ERROR MESSAGE 

{CACHE SYSTEM ERROR 
j RECOVER FROM ERROR 

{ALL ERRORS TO TRAP TO EMT VECTOR 

{UNIQUE ERROR NUMBER 

j ADDRESS OF ERROR MESSAGE 

j CACHE SYSTEM ERROR 
, ERROR! CACHE WAS NOT RE-ALLOCATED 
j SET FORCE CACHE MISS. 
;CACKE-177777i TSTLOC-000000 
;CLR RO 

j CLEAR FORCE CACHE MISS. 
;D0 WRTLCK INSTRUCTION 
j THESE NEXT TWO WORDS ARE THE 
jINSTR. BECAUSE THE ASSEMBLER 



WRTLCK 
WAS NOT 



READ* 



TO SOFT RETURN 



SUBROUTINE 



{IF HIT/MISS REGISTER BIT 5 NOT 

{THEN 

{MOVE RETRY ADDRESS 

;G0 TO SOFT E*ROR 

{ALL ERRORS TO TRAP TO EMT VECTOR 

{UNIQUE ERROR NUMBER 

jADORESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
{RECOVER FROM ERROR 



jALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
{ERROR! CACHE WAS NOT BYPASSED BY WRTLCK 
jREAD TEST LOCATION 



{ 



4 SET 



I If HIT/MISS REGISTER BIT 

{ THEN 

;MOVE RETRY ADDRES5 TO SOFT RETURN 

{GO TO SOFT ERROR SUBROUTINE 

{ALL ERRORS TO TRAP TO EMT VECTOR 

{UNIQUE. ERROR NUMBER 

{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
{RECOVER FROM ERROR 

{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
jERROR! CACHE WAS NOT RE -ALLOCATED 
{READ TEST LOCATION TO ALLOCATE CACHE 
{NOP PAD FOR ASRB HIT/MISS CAL C 
{DO ASRB INSTRUCTION 
lIF HIT/MISS REGISTER BIT 4 NOT Sf X 
; THEN 

{MOVe RETR> ADDRESS TO SOf T RETURN 
{GO TU SOFT ERROR SUBROUTINE 



J 4 



bLOfcMl -Wl :\ r , 

kojua.m:u: 



22S3 
22 c <4 
22>s 

22L>6 

2260 
2262 

2263 

.'264 

'■'\»? 
22-.. . 

;vt ■ 
22k » 
«?2/c 

,j> , ■ 

22/" 

2 v / fc s 
2<7~ 



,?2B0 
22ft', 

Z2t:2 

226 ■> 
22C4 
228S 

22 '16 
228 7 
2288 
2284 
2290 
2291 
2292 
2293 
2294 
229S 
2296 
22^ / 
2298 
2299 
2400 
2301 
2302 
230;', 
2304 
230S 
2306 
230/ 
2308 



'/)6"66 
0060 7 



00o076 
006 i 04 
OOOlvVo 
006114 
Of. 120 
006122 
COS 124 

00c If/, 
006126 
006 i 32 
0C6) V 
006142 



00614t> 



macu: 


50AC1052) 04 -APR 84 


10:38 PAGE 46 


03 -APR -84 


11:36 


T16 


TEST MULTIPROCESSING INST 


104000 






ERROR 




000062 






. WORD 


62 


001321* 






.WORD 


ERRMSG 


■,:V-,/67 


173024 


5$i 


TST 


TSTLOC 


i"w2"/f 7 


000010 


171646 


BIT 


4BIT03, HITMIS 


00./ 4 10 






BEQ 


6* 


< -2737 


005S32 


001120 


MOV 


0TST16»4,S#S0FTRE 


004'/ 6 7 


173520 




JSR 


PC, APTSFT 


10*000 






ERROR 




00006.* 






.WORD 


63 


0O3.32 r > 




6$: 


.WORD 


ERRMSG 


00503 7 


I 77 744 




CLR 


BOMSER 


00 SO 3 7 


177 766 




CLR 


QOCPEREG 


O0SO37 


001116 




CLR 


&OS0FTER 


000167 


OOOCOC 




JMP 


TST17 



SEQ 0048 



i ALL ERRORS TO TRAP TO EMI VECTOR 

I UNIQUE ERROR NUMBER 

I ADDRESS OF ERROR MESSAGE 

jCACHE SYSTEM ERROR 
{READ TEST LOCATION 
j IF HIT/MISS REGISTER BIT 3 SET 
j THEN 

5 M0VE RETRY ADDRESS TO SOFT RETURN 
jGO TO SOFT ERROR SUBROUTINE 
{ALL ERRORS TO TRAP TO EMT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 



{CLEAR THE 
{CLEAR THE 
{CLEAR THE 
1 JUMP OVER 



MEM SYS ERROR REG 

CPU ERROR REGISTER 

SOFT ERROR COUNT 

DATA TABLES OR SUBROUTINES 



jTO NEXT TEST 



CT3T21: 



*TEST 17 



TEST CACHE DATA RAMS 



;**** + *****44******** + 4^ A************************ **************** 

DATA STORE RAM TESTS - THERE ARE TWO TESTS EOR THE DATA STORE RAM. 
jTHfc riRST TEST WILL BE A NO DUAL ADDRESSING TEST AND THE SECOND 
;TEST WILL BE A DATA RELIABILITY TEST. THE NO DUAL ADDRESSING TEST 
:WTLL FIRST WRITE EACH WORD OE THE CACHE RAM WITH ITS WORD ADDRESS 
{AND VERIFY THE CONTENTS WITH A READ OF EACH ADDRESS. THEN EACH 
BYTE WILL BE WRITTEN WITH ITS ADDRESS AND CHECKED. THE DATA 
RELIABILITY TEST THAT WILL BE USED IS A TEST CALLED MOVING INVERSIONS 



BYPASS ON XERNAL SPACE AND NO 



WORD DATA HUFEER 



10000(8) 



BGNTST J 

SETUP MHO REGISTERS TO \~\Ml. 
BYPASS ON USER SPACE 

LET ps EQUAL KF.RNAl FOR CURRENT MODE. AND USER FOR PREVIOUS 
MODE 

ENABLE MMU 
{GET KIRS1 ADDRESS OF- 4K 
{CLEAR DATA TO BE WRITTEN 
{SET DIAGNOSTIC BIT (DIT<1>) IN CCR 
{DO UNTIL DATA TO BL WRITUN EQUALS 
{ . WRITE DATA TU ADDRESS 
j . ADD 2 TO ADDRESS 

ADD 2 TO DATA TO BE WRITTEN 

ENODO 

SAVE CONTENTS OF VECTOR 

LET VECTOR 114 POINT TO 
{GET FIRS! ADDRESS OF 4K 
{CLEAR EXPECTED DATA 
{DO UNTIl EXPECTED DATA 
} . READ ADDRESS 

i. IE RECEIVED DATA NE EXPECTED DATA THEN 

1. ERROR IN CACHE SYSTEM 



114 

DATA 

WORD 



STORE- 
DATA 



PARTY 
BUFFER 



ABORT ROUTINE 



EQUAl S 20000(8) 



I<4 



GLOBAL 


AM AS 


MACU1 


30AC1052) 04 -A 


KDJ11A. 


MAC 03 -APR -84 


lit 36 




23oo 










2310 










P31 1 










231.-? 










2515 










2314 










2515 










2516 










251? 










2518 










2519 










2520 










2321 










2322 










2323 










2324 










2325 










2526 










2527 










2528 










2529 










253C 










2331 










2332 










2335 










2534 


006146 








2355 


006146 


005267 


172632 




2336 


006152 


00476 7 


173234 




2557 


006156 


012/67 


001600 


164170 


2538 


006164 


042767 


000004 


164324 


2339 


006172 


052737 


000001 


177572 


2540 


006200 


012702 


140000 




2341 


006204 


005001 






2542 


006206 


05276/ 


000002 


171532 


2543 


006214 


020127 


020000 




2544 


006220 


001404 






2345 


006222 


010122 






2346 


001.224 


062701 


000002 




234/ 


006230 


0007 71 






2348 


006232 


015767 


000114 


172570 


2349 


006240 


012757 


001630 


000114 


2350 


006246 


042767 


000002 


171472 


2351 










2352 


006254 


012702 


140000 




2353 


006260 


005001 






2354 


006262 


020127 


020000 




2355 


006266 


001430 






2356 


006270 


005/12 






235/ 


0062 72 


032737 


000010 


177752 


2558 


006500 


001C10 






2359 


006502 


012/37 


006152 


001120 


2*360 


006510 


004 767 


173524 




2361 










2 562 












006314 


104000 






2364 


006516 


000064 







! -84 10j38 PAGE 49 

T17 TEST CACHE DATA RAMS 

ENDIF 

ADD 2 TO EXPECTED DATA 

ADD 2 TO ADDRESS 
i ENDDO 

j GET FIRST ADDRESS OF 8I< BYTE DATA BUFFER 
CLEAR DATA TO BE WRITTEN 
DO UNTIL ALL BYTES CHECKED 

WRITE DATA TO ADDRESS 

ADD 1 TO ADDRESS 

ADD 1 TO DATA TO BE WRITTEN 
ENDDO 

GET FIRST ADDRESS OF 8!< BYTE DATA BUFFER 
CLEAR EXPECTED DATA 
DO UNTIL EXPECTED DATA EQUALS 20000(8) 

READ ADDRESS 

IF RECEIVED DATA NE EXPECTED DATA THEN 

ERROR IN CACHE SYSTEM 

ENDIF 

ADD 1 TO EXPECTED DATA 

ADD 1 TO ADDRESS 
ENDDO 

RESTORE VECTOR 114 
jtNDTST 

i 

;;+* + + * + .** + * + * + + * + + + *+** + + **'« + + +4. + * + ***** + + + ******************* + * 

TST17 



SEU O049 



1$: 



2$: 



3$t 



INC 

JSR 

MOV 

BIC 

BIS 

MOV 

CLR 

BIS 

CMP 

BEQ 

MOV 

AOD 

BR 

MOV 

MOV 

QIC 

MOV 
CLR 
CMP 
BEQ 

tst 

BIT 
BNE 
MOV 
JSR 



ERROR 

.WORD 



ITESTN 

PC, 

01600, 

0BITU2, 

OfllTOO. 

0140000 

Rl 

46IT01, 

Rl. 

2$ 

Rl. 

02. 

1$ 

ORAMPAR 
0BIT01, 



INITMM 

KIPARb 
SR3 
SOSRO 
,R2 

CCR 
020000 

<R2)» 
Rl 

SLOLOO 
.80114 

CCR 



01 40000, R2 

Rl 

Ri. 020000 

5$ 

CR2) 

OflIT03,H0HITMIS 

At 

OTf,U7*4,GlOSOFTRE 

PC.APTSFT 



64 



TEST NUMBER 
REGISTERS/FORCE 



CACHE 
160000 



BUFFER 



INCREMENT 

SETUP MMU 

LET PAR6 MAP TO ADDRESS 

DISABLE KERNEL D SPACE. 

TURN ON MEMORY MANAGEMENT 

GET FIRST ADDRESS OF 4K WORD 

INIT DATA TO BE WRITTEN 

SET DIAGNOSTIC BIT 

DO UNTIL ALL ADDRESSES WRITTEN 

IF DONE GO CHECK DATA 

WRITE DATA TO ADDRESS 

UPDATE DATA BY 2 (WORD BOUNDARY") 

ENDDO 

SAVE CONTENTS OF VECTOR 114 

LET VECTOR 114 POINT TO ABORT ROUTINE 

CLEAR DIAGNOSTIC BIT. AL.l FURTHER 

REFERENCES TO PAGE 6 SHOULD BE CACHED, 

GET FIRST ADDRESS OF 4K WORD BUFFER 

INIT DnfA TO PE CHECKED 

DO UNTIL ALL ADDRESSES CHECKED 

IF DONE GO DO BYTES 

CHECK THAT CACHE WAS 

ALLOCATED 

SHOULD HAVE HIT 

MOVE RETRT ADDRESS TO SOFT RETURN 
jGU TO SOU ERROR SUBROUTINE 
; CACHE SYSTEM ERROR 
1 EXPECTED A HIT j GUT A MISS 
;A;, ERRORS TO TRAP 10 EMT VECTOR 
lUNIUUE ERRUR NUMBER 



BYPASS PAGES 0- 



L4 



GLOBAL AREAS 
KOJ11A.MAC 



MACU1 30AC1052) 
03 -APR -84 11:36 



2565 
2366 
2367 
236(5 

2370 
23/1 
23 72 
2373 
23 74 
2375 
23 76 
237 7 
2378 

23 79 
2380 
2381 
2382 
2383 
2384 
2385 
2386 
2387 
2388 
2389 
23^0 
2391 
2392 
2393 
2394 
2395 
2396 
2397 
2398 
2399 

24 00 
2401 
24 02 
2403 
2404 
2405 
2406 
2407 
2408 
2409 
24 10 

24 n 

2412 
2413 

24 14 

24 l r 

241b 

241/ 

24 18 

2419 

2420 



006320 
006322 
006326 
006332 
006334 
006336 
006340 

006342 
006346 



006350 
006356 
006362 
006364 
0063 70 
006372 
006374 
006400 
006402 
006406 

006410 

006412 
006420 
006422 
006430 



006434 
006436 
006440 
006442 
006446 
006452 
006454 
006462 
006466 
0064 70 
0064 72 

0064 74 
0064/6 
006502 

006504 
006510 

006514 
006522 
006526 
006532 
006536 



001325 
012267 
020167 
001403 
104000 
000065 
001325 

062701 
000745 



052737 
012702 
005001 
020127 
001404 
110122 
062701 
000771 
012702 
005001 

105712 
032/3 7 

001010 
012737 
004767 



104000 
000066 
001325 
112267 

120167 
001410 
012737 
004 767 
104000 
000067 
001325 

005201 
020127 

001342 

005067 

005067 
016737 
005037 
005037 
00503/ 
000167 



172510 
172504 



000002 



020000 

000001 
140000 

000010 

006152 
173204 



1723/0 
172364 

006152 
173152 



020000 



171236 
171056 
1/2310 
1/7/44 
1 / / /66 
0011 16 
000000 



04-APR-84 

T17 



4$: 



10; 38 PAGE 50 

TEST CACHE DATA RAMS 



SEQ 0050 



100$ 



000002 177746 5$ 
140000 



1/7752 
001120 



6$ 



7$ 



8$ 



101$ 



001120 



9$; 



10$ 



000114 



.WORD 

MOV 

CMP 

BEQ 

ERROR 

.WORD 

.WORD 

ADD 
BR 



ERRMSG 

Rl. 

100$ 

65 
ERRMSG 

02, Rl 
3$ 



RECDAT 
RECDAT 



jADDRESS OF ERROR MESSAGE 

iREAD TEST LOCATION 

{ IF RECEIVED DATA NOT EQUAL TO EXPECTED 

j THEN 

{ALL ERRORS TO TRAP TO EMT VECTOR 

{UNIQUE ERROR NUMBER 

{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
{UPDATE EXPECTED DATA BY 2 
jENDDO 



.***NOW CHECK BYTES**** 

{SINCE CACHE IS ALREADY ALLOCATED} WRITE BYTES WILL HIT 

;AND WRITE THROUGH CACHE TO MEMORY, 



BIS 


OBIT01.80CCR 


MOV 


0140000, R2 


CLR 


Rl 


CMP 


Rl, 020000 


BEQ 


7$ 


MOVB 


Rl, (R2) + 


ADD 


01, Rl 


BR 


6$ 


MOV 


0140000, R2 


CLR 


Rl 


TSTB 


CR2) 


BIT 


i>BIT03,aOHITMIS 


BNE 


101$ 


MOV 


0fST17*4,Q0S0FTRE 


JSR 


^C.APTSFT 


ERROR 




.WORD 


66 


.WORD 


ERRMSG 


MOVB 


(R2)», RECUAT 


CMPB 


Rl, RECDAT 


BEQ 


9$ 


MOV 


OTSU/^.aOSOFTRE 


JSR 


PC.APTSFT 


ERROR 




.WORD 


6/ 


.WORD 


ERRMSG 


INC 


Rl 


CMP 


R 1.020000 


BNF. 


8$ 


CLR 


CCR 


CLR 


SRO 


MOV 


SLOCOO, SOI 14 


CLR 


aoMSER 


CI R 


aOCPEREG 


Cl.R 


aJ0S0> TER 


JMP 


TS120 



{SET DIAGNOSTIC MODE IN CCR 
{GET FIRST ADDRESS OF 4K WORD BUFFER 
jINIT DATA TO OF. WRITTEN 
{DO UNTIL ALL ADDRESSES WRITTEN 
ilF DONE GO CHECK DATA 
{WRITE OATA TO ADDRESS 
{UPDATE DATA BY 1 CBYTE BOUNDARY) 
iENDDO 

{GET FIRST ADDRESS OF 4K WORD BUFFER 
iINIT DATA TO BE CHECKED 
{DO UNTIL ALL ADDRESSES CHECKED 
{CHECK THAT CACHE WAS ALLOCATED 
{SHOULD BE 
} A HIT 

{MOVE RETRY ADDRESS TO SOFT RETURN 
{GO TO SOFT ERROR SUBROUTINE 
{CACHE SYSTEM ERROR 
{EXPECTED A HIT{ GOT A HISS 
{ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

READ TEST LOCATION 

IF RECIEVED DATA NOT EQUAL TO EXPECTED 

THEN 

MOVE RETRY ADDRESS TO SOFT RETURN 

GO TO SOFT ERROR SUBROUTINE 

ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

; CACHE SYSTEM ERROR 



UPDATE 
IF ALL 



EXPECTED OATA B^ 1 



ADDRE 



HAVE 



NOT 



BEEN TESTED 



THEN GET NEXT 
ELSE EXIT TEST 

CLEAR THE CCR 

TURN Of F MMU 

RESTORE VECTOR 114 

CI EAR THF MEM Si 5 ERROR REG 

CI EAR T) CPU tRROR REGTSIER 

CLEAR T SOF l I RROR COUNT 

JUMP OVlh DATA TABLES OR SUBROUTINE'S 



M4 



GLOBAL AREAS 
KDJ11A.MAC 



MACU1 30AC1052) 
03-APR-84 11:36 



04-APR -84 10}38 PAGE 51 

T17 TEST CACHE DATA RAMS 



SEQ 0051 



2421 
2422 
2423 
2424 
2425 
2426 
2427 

2428 
2429 
2430 
2431 
2432 
24 3? 
2434 
2435 
24 36 
24 37 
2438 
24 39 
2440 
2441 
2442 
2443 
2444 
2445 
2446 
2447 
2448 
2449 

2450 
2451 
2452 
2453 
2454 
2455 
24:>6 
245 7 
2458 
2459 
2460 
2461 
2462 
2463 
2464 
2465 
2466 
2467 
2468 
2469 
24 70 
24 71 
24/2 
24/3 
24/4 
24/5 
24/6 



)T0 NEXT TEST 



006542 



CTST22: 



J+TEST 20 



CACHE DATA RAh DATA RELIABILITY TEST 



MOVING INVERSIONS TEST FOR DATA RAMS - THE TEST IS STARTED AFTER LOADING THE 
RAM STORE WITH O'S. EACH ADDRESS IS READ AND VERIFIED TO BE ALL O'S. THEN A 
i IS SUBSTITUTED IN A BIT POSITICN AND THf. NEU WORD IS WRITTEN. NEXT THE 
ADDRESS IS READ TO VERIFY THE NEW CONTENTS. THIS IS REPEATED FOR EACH BIT OF 
THE UORD LEAVING THE ARRAY FILED WITH 1'S. THE WHOLE PROCESS IS REPEATED 
PLUGGING IN O'S TO THE l'S AND REPEATED TWICE MORE ADDRESSING IN THE DOWNWARD 
DIRECTION. FINALLY EVERYTHING IS REPEATED FOR EACH BIT POSITION BEING THE 
LSB. TO SAVE TIME AND KNOWING THE LAYOUT OF THE RAM CHIPS INSTEAD OF DOING 
ONLY A SINGLE BIT AT A TIME EVERY FOURTH BIT WILL BE DONE CONCURRENTLY. 



BGNTST 

SETUP AND ENABLE MMU 
SETUP CCR TO ABORT PARITY 
CLEAR CACHE 
LET FWDSEQ - 01 
LET ADDLSB » 01 
DO UNTIL ADDLSB EQ 00 
LET CURDAT « 



ERRORS 



LET RITEDA 
LET NEWDAT 
IF FWDSEQ - 
LET 
LET 
ELSE 

LET 
LET 
ENOIF 

LET CURADD 
LET DCOUNT 



1 01 
' 01 
01 THEN 

FSTADD EQUAL 
LASTAD EQUAL 



FSTADD 
LASTAD 



EQUAL 
EQUAL 



FIRST ADDRESS OF 8I< BYTE BUFFER 
LAST ADDRESS OP 8K BYTE BUFFER 

LAST ADDRESS OF QK BYTE BUFFER 
FIRST ADDRESS OF 8K BYTE BUFFER 



STORE PARITY ABORT ROUTINE 



THEN 



FSTADD 
00 
SAVE CONTENTS OF VECTOR 114 
LET VECTOR 114 POINT TO DATA 
DO UNTIL DCOUNT EQ 010 

LET RECDAT - 3CURADD 
IF RECDAT NE CURDAT 
ERROR IN CACHE SYSTEM 
FNOIF 
IV DCOUNI GT 03 THEN 

LET aCURADD • aCURADD CLF.ARBY RITEDA 
ELSE 

LET QCURADD - SCURADD SETBY RITEDA 
ENDIF 

LET RECDAT - QCURADD 
IF RECDAT NE NEWDAT THEN 
ERROR IN CACHE SYSTEM 
ENDTF 

IF CURADD EQ LASTAD THEN 
IF RITEDA - 0210 
IF DCOUNf 



THEN 
NE 0/ IHEN 
LET CURDAT - 
LET RITEDA = 



03// 
021 



N4 



GLOBAL. ARK AS 
KDJ11A.MAC 

24 7 7 

24 78 
24 79 

2480 
2481 
2482 
2485 
2484 
2485 
2486 
2487 
2488 
2489 
2490 
2491 
2492 
2495 
2494 
2495 
2496 
2497 
2498 
24 99 
2500 
2501 
250c' 
2505 
2504 
2505 
2506 
2507 
2508 
2509 
2510 
2511 
2512 
2515 
2514 
2515 
2516 
2517 
2518 
2519 
2520 
2521 



MAC til 30A(1052) 
03-APR-84 11:36 



04-APR-84 
T20 



10:38 PAGE 52 

CACHE DATA RAM 



DATA RELIABILITY TEST 



SEQ 0052 



2523 
2524 
2525 
2526 
2527 
2528 
252** 
2530 
25 51 

2532 



ENDIF 



LET NEWDAT - 0356 



ELSE 



ELSE 



LET CURDAT - NEWDAT 

ROTATE RITEDA 

IE DCOUNT GT 03 THEN 

LET NEWDAT - NEWDAT Cl.EAREDBY RITEDA 

ELSE 

LET NEWDAT * NEWDAT SETBY RITEDA 

END IF 
ENDIF 

INCREMENT DCOUNT 
LET CURADD - FSTADD 

IF FWDSEQ - 01 THEN 

LET CURADD - CURADD * ADDl.SB 
IF CARRY THEN 

LET CURADD - CURADD > 01 
ENDIF 



ELSE 



LET CURADD - CURADD - ADDl.SB 
IF CARRY THEN 

LET CURADD * LAS-AD - ADDLSB 
LET CURADD * CURADD - #1 
ENDIF 



ENDIF 



006542 
006542 
006 _, 5 
006554 
006556 
006562 



006566 
0065 /4 
00660,' 
006610 



005267 
0527 7 7 
001002 

0003 67 

004 767 



012 767 
052/37 
05276/ 
012700 



172236 

001000 

000454 
172624 



000200 
000001 

ooo : oo 

140000 



ENDIF 
ENDDO 
IF FWDSEQ EQ 01 THEN 

LET FWDSEQ - 00 
ELSE 

ROTATE ADDLSB 
LET FWDSEQ - #1 
ENDIF 
ENPDO 

RESTORE VECTOR 114 
ENDTST 

RO-CURADD (CURRENT ADDRESS) 
Rl -WORKING REGISTER 
R2-RECDAT (RECEIVED DATA) 
R3-RITEDA (DATA TO BE WRITTEN) 
jR4-NEWDAT (EXPECTED DATA) 
;R5-CURDAT (CURRENT DATA) 

•;♦** + + + + * + + + + *+ + ** + * + + + * + + ♦* + + + + * + +.***+ + *+ + * + * + + + + + ♦ + + + + + ** + + * + * 

TST20: 



172272 



100$: 



165560 

17 75 72 
171136 



INC 


m.STN 


BIT 


0BITO9.&ISWR 


BNE 


100* 


JMP 


EXIST 


JSR 


PC, INITMM 


MOV 


V^'OO, KIP AM t> 


HIS 


0B[TOO.u)05RO 


HL5 


0200. CCR 


MOV 


0140000, RO 



INCREMENT TEST NUMBER 

ARE DATA RELIABILITY TESTS SEUCTED7 
IF BIT09 IN SWR * 1 ; DO RELIABILITY TEST 
ELSE SKIP Tf 
SETUP MEMORY MANAGEMENT 
PAGES THRU 5 BYPASS CACHE 
PAGES 6 AND 7 DON' T BYPASS CACHE 
LIT KIPAR6 HE -LOCATE TU 20000-37/7.' 
TURN ON MMU 
ENABLE PARITY ABORTS 
- - * 



GLOBAL. 


ARf AS 


MACU1 


50AI 1050 


) 04 APR 84 10 


5 38 PAGfr 53 


h. .) 




KDJ11A. 


MAC 03 -APR 84 


1 1 : 36 




TOO 


CACHE 


DATA RAM 


DATA RELIABILITY TEST 


£533 


006614 


010701 


010000 






MOV 


010000, 


Rl | 


♦ 


0534 


006600 


005000 






H: 


Cl-R 


(RO)* 




♦CLEARING CACHE 


0535 


006602 


7 7102 








SOB 


Ri. 


It 


* 


0536 


006604 


012767 


000001 


1/0034 




MOV 


• 1. 


fUOSEQ i 


INIT UPWARD ADDRESSING INDICATOR 


2537 


0066 32 


012767 


000001 


170030 




MOV 


• 1. 


ADDLSO i 


INIT I. SB ANO DO LOOP UNTTl SHIFTED OUT 


0538 


006640 


013767 


000114 


170160 




MOV 


B0114, 


SI OCOO i 


SAVE CONTENTS OF VECTOR 114 


053** 


006646 


012737 


001630 


000114 




MOV 


♦RAMPAR 


.Q0114 , 


LET VECTOR POINT TO ABORT ROUTINE 


0540 


006654 


005002 








Cl.R 


RO 




INIT RECDAT, 


0541 


006656 


005005 






TSTLUPj 


CL1 


R5 




INIT CURRENT DATA 


0540 


006660 


012705 


000001 






ilOV 


001. 


R3 ! 


INIT DATA TO BE WRITTEN 


054 3 


006664 


012 704 


000001 






MOV 


•21. 


R4 


INIT EXPECTED DATA 


0544 


006670 


005 76 7 


1/0170 






TST 


FW05EQ 




IF ADDRESSING UPWARD 


2545 


006674 


00140 7 








BEQ 


11 




THEN 


0546 


0066 76 


O10767 


140000 


1/0174 




MOV 


#140000 


.FSTADD 


LET FIRST AOORESS EQUAL LOWEST VALUE 


054 7 


006704 


01276/ 


157777 


170170 




MOV 


♦157777 


.LSTADD i 


LET LAST ADDRESS EQUAL HIGHEST VALUE" 


2548 


006712 


000406 








BR 


0$ 




ELSE 


054<* 


006 714 


010767 


157777 


170156 


11: 


MOV 


♦157777 


.FSTADO j 


LET FIRST ADDRESS EQUAL HIGHEST VALUE 


0550 


006700 


012767 


140000 


170150 




MOV 


♦140000 


,LSTADD 


LET LAST ADDRESS EQUAL LOWEST vALUE 


0551 


006730 


016/00 


170144 




2$: 


MOV 


FSTADD, 


RO , 


LET CURRENT ADDRESS EQUAL FIRST ADORES 


0550 


006734 


00506 7 


170114 






CLR 


DCOUNT 




INIT LOOP COUNTER 


0553 


006740 


02276/ 


000010 


170106 


BGNTLPj 


CMP 


♦8., 


DCOUNT 


DO L00f> 8 TIMES (4 TIMES TO WRITE l'S 


0554 


006/46 


001511 








BEQ 


tNOTLP 




ANO 4 TIMES TO WRITE BACK O'S) 


0555 


006750 


111002 








MOVB 


(RO).RO 




FIRST READ LOCATION 


0556 


006752 


120005 








CMPB 


R2, 


RS 


IF RECiEVED DATA NOT EQUAL TO EXPECTED 


055 7 


006 754 


OO1403 








BEQ 


11 




DATA THEN 


0558 


006 756 


104000 








ERROR 






ALL ERRORS TO IHAP TO EMT VECTOR 


.2559 


006760 


000070 








.WORD 


70 




L^IQUE ERROR NUMBER 


0560 


006762 


001305 








.WORD 


ERRM5G 




ADDRESS OF ERROR MESSAGE 


2561 


















j CACHE SfSTEM ERROR 


0562 


006 764 


002767 


000003 


170062 


11: 


CMP 


♦3, 


DCOUNT | 


IF LOOP COUNT GREATER THAN 3 


0563 


006772 


002000 








BGE 


0$ 




THErt 


0564 


006 7 74 


140310 








BICB 


R3> 


(RO) 


CLEAR TEST DATA By WRITE DATA 


0565 


006776 


000401 








BR 


3$ 




ELSE 


0566 


007000 


150310 






0»: 


BISB 


R3, 


(RO) 


SET TEST DATA Bt WRITE DATA 


056 7 


00 7002 


111002 






3t: 


MOVB 


(RO).RO 




DO READ AFTER WRIU 


0563 


007004 


120004 








CMPB 


RO. 


R4 i 


IF RECIEVED DATA NOT EQUAL Tt) EXPECTED 


0569 


007006 


001403 








BEQ 


41 




DATA THEN 


05 70 


007010 


104 OOO 








ERROR 






ALL ERRORS TO TRAP TO EMT VECTOR 


2571 


007012 


0000/1 








.WORD 


M 




l^TQL* ERROR NUMBER 


0572 


007014 


001305 








.WORD 


ERRMSG 




ADDRESS OF ERROR MESSAGE 


05 73 


















iCACHE StSTEM f RROR 


0574 


007016 


020067 


170060 




Att 


CMP 


RO. 


LSTADD i 


IF CURRENT ADDRESS EQUALS LAST ADDRESS 


05/5 


007022 


001034 








BNE 


8$ 




THEN 


05/6 


007024 


022703 


000010 






CMP 


♦ 210, 


R3 i 


ANO IF WRITE PATTERN E'UUAl S I AST 


0577 


007030 


001013 








BNE 


51 




PATTERN THEN 


05 78 


007032 


002767 


00000 7 


170014 




CMP 


• <\ 


DCOUNT 


AND TEST IS NOT ON LAST LOOP 


0579 


007040 


001400 








BEQ 


/• 




THEN 


0580 


007042 


012/05 


0003// 






MOV 


♦ 3//, 


R5 


SET UP TO WRITE 0*5 


0581 


007046 


012703 


000001 






MOV 


•01, 


R3 




0580 


00/052 


012704 


000356 






MOV 


♦ 556. 


R4 




0583 


007056 


000411 








BR 


/$ 




ELSE 


0584 


00 7060 


010405 






bli 


MOV 


R4. 


PS 


SIT UP FOR NfXT DATA PATTERN 


0585 


00/062 


006105 








HOI 


R5 






0586 


00 7064 


020767 


000005 


i/r/tt 




CMP 


• 3. 


DCOUNT 


AND IF DOWNWARD ADDRESSING 


^58 / 


00/0/0 


OOOOOO 








BGf 


hi 




THIN 


2b8ti 


00/0/4 


Q4C3Q4 








UIC 


R3, 


HA 


iLtl NEW DATA UL CLtARtO U* WRUt DATA 



SEO 0053 



IJh3Mll.fflb AS Os'WMW.tf 58 ' °"- APR T?3 ^JHcffi^RAM DATA RtLIttlLITY 



TEST 



fit 



SEQ 0054 



25H9 


00/0/6 


000401 




2590 


007100 


050 304 




2591 


00/102 


00526 7 


1/1/46 


2592 


007106 


016700 


171766 


2593 


007112 


000426 




2594 


007114 


005767 


171746 


2595 


007120 


001412 




2596 


007122 


066700 


171742 


2597 


007126 


022700 


160000 


2598 


007132 


003016 




2599 


007154 


162700 


020000 


2600 


007140 


062700 


000001 


2601 


007144 


000411 




2602 


00/146 


166700 


171716 


260? 


007152 


022700 


1400C0 


2604 


007156 


003404 




2605 


00/160 


062700 


020000 


2606 


007164 


162700 


000001 


2607 


007170 


000663 




2608 


00/1/2 


00576 7 


171670 


2609 


007176 


001404 




2610 


00/200 


00506 7 


171662 


2611 


007204 


000167 


177446 


2612 


007210 


012767 


000001 


2613 


007216 


00616/ 


171646 


2614 


007222 


022767 


020000 


2615 


007230 


001402 




2616 


007232 


000167 


177420 


2617 


007236 


01673/ 


171566 


2618 


007244 


00506 7 


1704 76 


2619 


007250 


00506 7 


170316 


2620 


007254 


005057 


177744 


2621 


007260 


005037 


177766 


2622 


00/264 


OL->037 


001116 


2623 


007270 


000167 


000000 


2624 








2625 








2626 


007274 






262/ 








2628 








2629 








2630 








2631 








2632 








26 33 








26 34 








2635 








2636 








263/ 








2638 








26 5'* 








2540 








264 1 








2642 








2*-4f 








2644 











BR 


7$ 


6$: 


BIS 


R3, R4 


7$: 


INC 


DCOUNT 




MOV 


FSiADU, RO 




BR 


iOi 


8*2 


TST 


FWDSEQ 




BEQ 


9$ 




ADD 


ADDLSB, RO 




CMP 


0160000, RO 




BCT 


101 




SUB 


020000, RC 




ADD 


01, RO 




BR 


101 


9$! 


SUB 


ADDLSB, MO 




CMP 


0140000, RO 




BLE 


10$ 




ADD 


020000, RO 




sue 


01, RO 


10$j 


BR 


BGNTLP 


ENDTLPi 


TST 


FWDSEQ 




BEQ 


1$ 




CLR 


FWDSEQ 




JMP 


TSTl.UP 


1 » i 


MOV 


01. FWDSEQ 




ROL 


ADDLSB 


ENDLUP; 


C*!P 


020000, ADDL SB 




BEQ 


EXTST 




JMP 


TSTLUP 


F.XTST: 


MOV 


SLOCOO, 80114 




CLR 


CCR 




CLR 


5R0 




CLR 


BOMSER 




CLR 


OOCPEREG 




CLR 


80S0F TER 




JMP 


TST21 



171650 Hi MOV 01, FWDSEQ iSET ADDRESSING UPWARD INDICATOR 

.UPDATE LSB TO NEXT POSITION 

171640 ENDLUP; CW 020000, ADDLSB iWE ONLY GO AS FAR AS 10000 

ENODO 
JMP TSTLUP 

000114 EXTST: MOV SLOCOO, 80114 iRESTORE VECTOR 114 

INIT CCR TOP EXIT 
TURN OFT MMU 

CLEAR THE MEM SYS ERROR REG 
CLEAR THE CPU ERROR REGISTER 
L^EAR THE SOFT ERROR COUNT 
JL*1P OVER DATA TABLES OR SUBROUTINES 
TO NEXT TEST 

CTST23: 

| !••♦* 

: •TEST 
*♦*****♦♦*♦**♦♦*♦♦ + *******♦♦*♦*♦♦*♦•♦***********************♦**** 

TAG STORE RAM TESTS - THERE ARE TWO TESTS FOR THE. TAG STORE RAMS. THE FIRST 
TEST IS AN ADDRESSING TEST TO ENSURE NO DUAL ADDRESSING OF THE TAG STORK 
THE SECOND TEST IS A "GALLOPING ONES AND ZEROS" TEST THAT CHECKS THE DATA 
RELIABILITY OF THE TAG RAMS. 



EL SE 

LET NEWDAT BE SET Br WRITE DATA 

UPDATE LOOP COUNTER 

REINIT FIRST ADDRESS FOR THIS PASS 

ELSE 

IF ADDRFSSING UPWARD 

THEN 

CALCULATE NEXT HIGHER ADDRESS 

IF CURRENT ADDRESS HAS BEEN INCREASED 

ABOVE HIGHEST ADDRESS THEN 

ROLL ADDRESS BACK 



ADDRESS 



ELSE 

CAL CULATE NEXT LOWER 

LF CURRENT ADDRESS HAS BEEN DECREASED 

BELOW LOWEST ADDRESS THEN 

ROLL ADDRESS BACK 



ENODO 

IF ADDRESSING 

THEN 

DO ADDRESSING 



UPWARD FINISHED 
DOWNWARO 



21 



TAG RAM DUAL ADDRESS TEST 



THE 



CACHE 



DUAL ADDRESSING TEST - THIS WILL BE DONE BY FIRST FLUSHING 

THE FIRST 256(10) LOCATIONS (BLOCK 0) WILL BE WRITTEN WITH 

Will CAUSE A INCREMENTING PATTERN TO BE. STORED IN THOSE LOCATIONS Of 

STORE RAM. NEXT THE ENTIRE 4K ADDRESS RANGE WILL BE READ. THE HIT. "MISS 

REGISTER SHOULD ONLY REPORT HITS QN THE A20RFSSES THAT WERE ALLOCATED. 

PROCESS WILL BE REPEATED FOR EACH BLOCK FQR A TOTAL OF 16 (10) BLOCKS. 

INITIALIZE LOW ADDRESS 
SETUP AND ENABLE MMtl 
INITIALIZE BLOCK COUNTER 



, THEN 
THAT 

THE TAG 



TH1 1 



&5Mk.fi!fc As o^% 5 m^ m - apr t5? io '?«g BUfi^ii 



D r D 



I ADDRESS TEST 



SEQ 0055 



2645 

264 1> 

264 ; 

2648 
2649 
2650 
2fc5l 
k ?bW 
2653 

2654 

2655 

265. 
2658 
2659 
2660 
2661 
26t>2 
2667 
2664 
2665 
2666 
266? 
2668 
2669 
26 '0 
2b 71 

2o72 

2673 
2674 

26/5 
26/6 

267 7 
2b 78 
2679 

268 
2681 
2682 
2685 
2684 
2685 
2686 
2687 
2688 
2689 
2690 
2691 
269? 
2693 
2694 
2695 
2696 

269 / 
2698 
2699 
2700 



00/2 74 
007274 
00 7 500 
0C73O6 
007310 
007314 
00/322 
007326 
03/3 34 
00 7 34? 
00 7 350 
00/356 
007 364 



00526/ 
03277/ 
001402 
000167 
012767 
004 76 7 
012/67 
052/37 
012/67 
01273/ 
012737 
016 705 



I DO UNTIL ALL BLOCKS TESTED (16 TIMES) 

FLUSH CACHE AND SET DIAGNOSTIC DIT 
LET CURRENT ADDRESS - LOW ADDRESS 
INITIALIZE ALLOCATION COUNTER 
DO UNTIL ENTIRE BLOCK ALLOCATFD (256 TIMES) 
IF" CURRENT ADDRESS < 32K THEN 

READ CURRENT ADDRESS 
ELSE 

WRITE CURRENT ADDRESS 
ENOIF 

UPDATE CURRENT ADDRESS (ALSO ADD 200 TO PAR) 
ENDDO 

INITIALIZE GOOD ADDRESS 
INITIALIZE OARENT ADDRESS 
INITIALIZE LOCATION COUNTER 
SAVE CONTENTS OF VECTOR 114 

LET VECTOR 114 POINT TO TAG STORE PARITY ABORT ROUTINE 
DO UNTIL ALL LOCATIONS CHECKED (256 TIMES) 
INITIALIZE CHECK CCUTITER 
DO UNTIL ADDRESS IN EACH BLOCK CHECKED 
READ CURRENT ADDRESS 
IF HIT THEN 

IF CURRENT ADDRESS NE GOOD ADDRESS 

ERROR IN CACHE SYSTEM 
ENDIE 



THEN 



ENDDO 

DISABLE 

RESTORE 

ENCTST 



ENDDO 

MTtU 
VECTOR 



ENDDO 
UPDATE 



114 



ELSE 



END IE 

UPDATE 

UPDATE 



IF 



CURRENT ADDRESS EQUAL GOOD ADDRESS THEN 
ERROR IN CACHE SYSTEM 
ENOIF 

GOOD ADDRESS (ADD 02) 
CURRENT ADDRESS 



LOW ADDRESS (ADD 02000) 



R3-GOODA0 
R5-CURADD 



171504 
0004 OC 

000404 
140000 
172064 
000020 
000001 
1///60 
002000 
000402 
171516 



TST2lt 



* + *♦♦**♦ + + * + ♦*#+>.*;.♦♦#**#*♦*********#*••*********♦********* 



171540 



171564 300? { 

163162 
17/5/2 
171510 
W2.354 1$. 
177746 



INC JU.STN 

BIT 0BlTOU,aSWR 

BEQ 3001 

JMP 10$ 

MOV 0140000, LOWADD 

J5M PC, INITHM 

MOV 020, 5R5 

RIS <>BITOO,aoSRO 

MOV 0-16., LOOPIN 

MOV 02000, SOKIPARo 

mov 0402, yocCR 

MOV 10WA0D, R5 



INCREMENT TEST NUMBER 

IS THIS AN 18 BIT SYSTEM? 

DO THIS TEST IF IT 1SN' T 

ELSE: JUMP TO END OF TEST 

INITIALIZE LOW ADDRESS (USE PAR6) 

INITIALIZE MMU 

ENABLE 22 BIT ADDRESSING 

ENABLE MMU 

DO UNTIL ALL BLOCKS TESTED 

SET KIPAR6 RELOCATION CONSTANT TO PAGE 8 

FLUSH CACHE AND SET DIAG BIT 

GET FIRST ADDRESS IN CURRENT BLOCK 



E5 



tit OBAi. AREAS 
KDJ11A.MAC 



MMCU1 30AQ052) 
03 -APR 84 11:36 



04 -APR -64 
T21 



10 j 



2701 

2702 
2703 
2 704 
2705 
2/06 
270" 
.7708 
2709 
2710 
2711 
2 712 
2715 
2714 
2715 
2 716 
2717 
2716 
2719 
2 720 
2721 
2722 
2723 
2724 
2725 
2726 
27?7 
2723 
2729 
2730 
2731 
2732 
2 733 
2/34 
2 7 35 
2736 
2737 
2/38 
2739 
2740 
2 741 
2742 
2743 
2744 
2745 
2746 
274 7 
2/48 
2/49 
2750 
2 751 
2 752 
2 755 
2 754 
2/55 
2 756 



007370 
007376 
007400 
007404 
007412 
007416 



007420 
007424 
007430 
007436 
007444 

007452 
007460 

007466 
007470 



007474 
007500 
007502 



007504 
007510 

007514 
007516 
007522 
007524 
007526 
007532 

007534 
007536 
007540 
00 7546 



007552 
00 7554 
00/556 
007560 
007562 
007564 
007572 



012767 
005015 
062705 
062737 
00526 7 
001367 



016/03 
012705 
012737 
013767 
012737 

C12767 

012767 
005015 
013702 



012704 
005104 
074504 



042704 
022704 

001404 
032702 
001416 
000403 
032702 
001412 

020503 
001422 
012/37 
004 767 



104000 

0000^2 
001325 
C20503 
001010 
012737 
004767 



177400 171460 



000002 
000200 
171440 



171462 
140000 
O02000 
00011.'* 
001630 

177400 
177761 

177752 



007470 



177701 
000076 



000004 
000010 



00 7 300 
172066 



007 500 
172042 



172354 



172354 
171364 
000114 

171376 
171366 



001120 



001120 



4$ 



MOV 
CLR 
ADD 
ADD 
INC 
BNE 



PAGE 56 
RAM DUAL 



ADORE 



TEST 



5EQ 0056 



0-256. 

(R5) 

42, 

0200, 

ALLCTR 

3$ 



ALLCTR 

R5 
80KIPAR6 



j DO UNTIL ALL ADDRESSES ALLOCATED 

, WRITE CURRENT ADDRESS 

{UPDATE CURRENT ADDRESS 

I ADD 200 TO KIPAR6 TO INC TAG CONTENT'S 

j IF ALL ADDRESSES ALLOCATED 

{ENDDO 



j {ADDRESSES HAVE NOW BEEN ALLOCATED. NEXT WE'LL CHECK THAT 
i j THERE WAS NO DUAL ADDRESSING. 



5*! 

6*: 

205$ 



MOV 
MOV 
MOV 
MOV 
MOV 

MOV 
MOV 
CLR 
MOV 



LOWADD. R3 
0140000, R5 
^2000,SM<IPAR6 
S0114, SLOCOO 
<>R AMP AR, SWIM 



{INITIALIZE GOOD ADDRESS 

{GET FIRST ADDRESS 

{RESET KIPAR6 

{SAVE VECTOR 

{LET VECTOR POINT TO RAM 



ABORT ROUTINE 



256 
*15. 

CR5) 

S0HITMIS.R2 



ALLCTR 

DCOUNT 



{DO UNTIL ALL LOCATIONS CHECKED 

{DO UNTIL ADDRESS IN EACH BLOCK CHECKED 

{URITE R5 

{SAVE THE CONTENTS OF THE HT.T/MISS REG 



{THE FOLLOWING CODE 15 TO CHECK FOR EXTRA FETCHES CAUSED BY THE PRF -FETCH 

{SUFFER BEING OVER WRITTEN WHEN BITS 1-5 OF THE PREVIOUS WRITE 

{ADDRESS (THE EFFECTIVE ADDRESS OF CLR CR5)) ARE EQUAL TO BITS 1-5 

{OF THE CURRENT INSTRUCTION FETCH ADDRESS. (ADDRESS Of MOV S0HITMIS.R2 INST) 

{THE EXTRA FETCH CAUSES THE HIT MISS REGISTER CONTENTS TO HE SHIFTED, 

J 

SAVE ADDRESS OF MOVE INST IN R4 
COMPLIMENT R4 

IF ANY OF BITS 1-5 IN R5 ARE EQUAL 
TO ANY OF BITS 1-5 IN R4 THEN THE 
ADDRESSES WERE NOT EQUAL 
ONLY CONCERNED WITH BITS 5-1 
IF R4-76 THEN BITS 5-1 IN R4 AND R5 
WERE COMPLIMENTS 
IF THEY'RE NOT 

THEN CHECK FOR BIT2 SET IN HIT/MISS RCG. 
IF ACCESS WAS A CACHE MISS THEN GO TO 7$ 
ELSE IT WAS A HITj GO TO 230$ 
ELSE CHECK FOR 8IT3 SET IN HIT/MISS RKG. 
IF ITS NOT A HIT THEN GO TO 7$ 
ELSE 

IF CURRENT ADDRESS NOT EQUAL TO GOOD 
ADDRESS THEN 

MOVE RETRY ADDRESS TO SOFT RETURN 
GO TO SOFT ERROR SUBROUTINE 
{CACHE SYSTEM ERROR 

{GOT A CACHE HISS WHEN EXPECTING A HIT 
ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 



220$ 



230$ 



7$ 



RA FETCH CAUSES THE HIT M 


MOV 


*205$,R4 


COM 


R4 


XOR 


R5,R4 


BIC 


•177>01,R4 


CMP 


076, R4 


BEQ 


220$ 


BIT 


<fF.IT02.R2 


BEQ 


7$ 


BR 


230$ 


BIT 


O8IT03.R2 


BEQ 


7$ 


CMP 


H5, R3 


BEQ 


8$ 


MOV 


</TST21*4,oMS0FTRE 


J5R 


PC.APTSFT 


ERROR 




.WORD 


/? 


.WORD 


ERRMSG 


CMP 


R5, R3 


BNt 


8$ 


MOV 


<MST2J »4,SftS0F TRE 


JSR 


PC.APTSFT 



ADDRESS OF 
IF CERENT 
THEN 

MOVE RETR> 
GO TO SOFT 



ERROR MESSAGE 

ADDRESS EQUAL 



GOOD ADDRESS 



ADDRESS TO SOFT RETURN 
ERROR SUBROUTINE 



{CACHE SYSTEM ERROR 



F5 



GLOBAL 


ARIAS 


MACU1 


30AC1052) 04 -APR -84 


10 j 38 PAGE 5 7 




KDJ11A. 


MAC 03 -APR -84 


11:36 




T21 


Tag ram 


DUAL ADDRESS TES 


275? 
5758 


007576 


104000 








ERROR 






2759 


007600 


000073 








.WORD 


i"o 




2760 


007602 


001325 








.WURD 


ERRMsC 




2761 


007604 


062705 


001000 




8$: 


ADD 


41000, 


R5 


2762 


007610 


005267 


171240 






INC 


DCOUNT 




276? 


007614 


002724 








BLT 


6$ 




2764 


007616 


062703 


000002 






ADD 


02, 


R3 


2765 


007622 


042705 


017000 






BIC 


017000, 


R5 


2766 


007626 


062705 


000002 






ADD 


*2. 


R5 


2767 


007632 


062737 


000200 


172354 




ADD 


0200, 


80KIPAR6 


2768 


007640 


005267 


171212 






INC 


ALLCTR 




2769 


007644 


002705 








BLT 


5$ 




2770 


007646 


062767 


001000 


171232 




ADD 


01000, 


LOWADD 


2771 


007654 


005267 


171200 






INC 


LOOPIN 




2 772 


007660 


002002 








BGE 


9$ 




2773 


007662 


000167 


177462 






JMP 


H 




2774 


007666 


00506 7 


167 700 




9$: 


CLR 


SRO 




2775 


007672 


016737 


171132 


000114 




MOV 


SLOCOO, 


S0114 


2776 


007700 


005037 


177744 






CLR 


80MSER 




2777 


007704 


005037 


177766 






CLR 


QOCPEREG 


2778 


007710 


005037 


001116 






CLR 


SfrSOFTER 


2 779 

2 780 
2/81 


007714 


000167 


000000 






JMP 


TST22 




007720 








10$: 








2782 



















SEQ 0057 



{GOT A CACHE HIT WHEN EXPECTING A MISS. 
I ALL. ERRORS TO TRAP TO EMT VECTOR 
l UNIQUE ERROR NUMBER 
I ADDRESS OF ERSOR MESSAGE 
{UPDATE TO NEXT BLOCK 

»IF ADDRESS NOT CHECKED FOR EACH BLOCK 
jENDDO 

jUPDATE GOOD ADDRESS 
} UPDATE ADDRESS TO BE CHECKED 



j IF ALL ADDRESSES CHECKED 

jENDDO 

{UPDATE TO NEXT BLOCK TO Be ALLOCATED 

l IF ALL BLOCKS WERE TESTED 

lENDDO 

Idisable MMU 

{RESTORE ABORT VECTOR 
{CLEAR THE MEM SYS ERROR REG 
{CLEAR THE CPU ERROR REGISTER 
{CLEAR THE SOFT ERROR COUNT 
;JUMP OVER DATA TABLES OR c » 
{TO NEXT TEST 



G5 



GLOBAL ARE' AS 
KDJ11A.MAC 



MACU1 30AC1052) 
03-APR-84 11:36 



04-APR-64 
T21 



10 



38 

TAG 



PAGE 58 
RAM DUAL 



ADDRESS TEST 



SEQ 0058 



2783 
2784 
2785 
2786 
2787 
2788 
2789 
2790 
2791 
2792 
2793 
2794 
2795 
2796 
2797 
2798 
2799 
2800 
2801 
2802 
2803 
2804 
2805 
2806 
2807 
2808 
2809 
2810 
2811 
2812 
2813 
2814 
2815 
2816 
2817 
2818 
2819 
2820 
2821 
2822 
2823 
2821 
2825 
2826 
2827 
2828 
2829 
2830 
2831 
2832 
2833 
2834 
2835 
283', 
2837 
2838 



007720 



007720 
007720 
007724 
007732 
007734 
007740 
007746 
007750 
007756 
007760 
007764 
007772 
OlOOOO 
010004 
0.10010 
010016 
010024 
010032 
010036 
010042 
010046 
010054 
010056 
010060 



010064 

010070 
010074 
010102 
010106 
010110 

010112 

010120 
010124 



005267 
032777 
001002 
000167 
032777 
001404 
012767 
000402 
005067 
013767 
012737 
005037 
004767 
042767 
012767 
012767 
012701 
012702 
012700 
012767 
012221 
077002 
000137 



012701 
005037 
042727 
012702 
005721 
077202 

012737 

012701 
012706 



171060 
001000 

0007 72 
000400 

177777 

171056 
000114 
000116 
000116 
171402 
100000 
000020 
001600 
100000 
000000 
OlOOOO 
000001 



110064 



1*40000 
172354 
100000 
OlOOOO 



000002 
1106 72 
12000C 



010130 012702 140002 



171U4 

171100 
171064 



171036 
000114 



162274 
162472 
162316 



167516 



172300 



177746 



.DSABl. AMA 
CTST24: 

| ; ********** 

;*TEST 22 
i . ********** 
TST22: 

INC 

BIT 

BNE 

JMP 

BIT 

BEQ 

MOV 

BR 

CLR 

MOV 

MOV 

CLR 

JSR 

BIC 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

SCB 

JMP 



***************************************************** 

TAG RAM DATA RELIABILITY TEST 
*********************** **+*******+**++*************** 



1000$ 



1001$; 
1002$; 



100$: 



$TESTN 

0BIT09, 

1000$ 

XXX 

08IT08, 

1001$ 

0177777 

1002$ 

FLAG 

30114, S 

0116, QO 

S0116 

PC, 

0BIT15, 

020, SR3 

01600, K 

0100000 

00, R2 

04096. , 

Ol.SRO 

(R2)*.( 

RC,100$ 

801011* 



aswR 
as MR 

.FLAG 

LOCOO 
114 

INITMM 
KIPDR5 

IPAR4 
,R1 

RO 

an* 

100000 



INCREMENT TEST NUMBER 

ARE DATA RELIABILITY TESTS SELECTED? 

IF BIT09 IN SWR - 1 j THEN DO TEST 

ELSE GO TO END. 

IS THIS AN 18 BIT SYSTEM? 

IE BIT08 IN SWR-0 BRANCH TO 1001$ 

SET UP INDICATOR FOR 18 BIT SYS 

SET UP INDICATOR FOR 22 BIT SYSTEM 

SAVE OLD PARITY ERROR VECTOR 

PUT TRAP CATCHER IN FOR CACHE PARITY ERRORS 

INITIALIZE MMU 

CLEAR CACHE BYPASS ON PDR5 

ENABLE 22 BIT ADDRESSING. 

SET KIPAR4 TO RELOCATE TO RANK 7 OF MEM. 

SET UP Rl AS POINTER TO BANK ? VIA KIPAR4 

SET UP R2 AS POINTER TO BANK 

SET UP RO AS COUNTER 

TURN ON MMU 

MOVE ALL THE CODE IN FIRST 4KW TO BANK 7 

START EXECUTING OUT OF BANK 7 



j WE ARE NOW OPERATING FROM PHYSICAL MEMORY IN BANK 7 (160000-177776) 



101$: MOV 0140000, Rl 

CLR S0KIPAR6 

BIC oeiTl5,QOKIPDRO 

MOV OlOOOO, R2 

l$t TST (Rl)f 

SOB R2. 1$ 

mov oenoi.aoccR 

MOV OTAGA01*100000,R1 

MOV 0120000 ,R6 



MOV 
START TESTING 
THE OBJECT OF 
GIVEN ADDRESS 
CHANGE IN THE 
ADDRESSES ARE 
DATA COMBINATIONS 
IS RESET TO /EROS 



0140002, R2 



I SETUP TO INIT CACHE TAG STORE TO ZEROS 

i SET KIPAR6 TO RELOCATE TO PAGE 

j ALLOW CACHE REFERENCE ON PAGE ZERO 

l INITIALIZE 4K WORDS 

{CLEAR TAG STORE 

{LOOP UNTIL ALL OF TAG STORE INITIALIZED 

{SET DIAGNOSTIC BIT IN CCR 

{MAKE R.V <\ POINTER TO TABLE OF DATA. 

{SET UP TEST ADDRESS IN R6 

1 USING R6 TO SPEED UP TEST LOOP 

|K«7 WILL BE USED TO INDEX THRU THE CACHE 



POSIBLE DATA COMBINATION AT A 
ARE SET TO ALL ZEROS. ONCE A 
S3 HAS BEEN MADE, j ALl OTHER 
A HAS NOT BEEN ALTERED. WHEN Ai.L 

PARTICULAR ADDRESS} THAT ADDRESS 
VE ADRESS IS TESTED. THIS IS DONE 
UNTIL ALL 4096 LOCATIONS HAVE BEEN TESTED. 



THIS TEST IS TO TRY EVERY 

WHILE ALL OTHER ADDRESSES 
DATA AT A PARTICULAR ADDRE 
CHECKEO TO ENSURE THAT DAT, 
HAVE BEEN CHECKED AT /'. 

AND THE NEXT CONSECUfi' 



010134 012137 172352 



FLDO; MOV 



(Rl)*,aOKIPAR5 



{MOVE RELOCATION OFFSET (DATA THAT wil.L 



H5 



GLOBAL. 


AREAS 


MACU1 


30AC1052: 


1 04-APR-84 10 


:38 PAGE 59 


KDJ11A. 


MAC 03 -APR -84 


11:36 


T22 


TAG RAM 


DATA RELIABILITY 


2839 














2840 


010140 


005767 


170676 




TST 


FLAG 


2841 


010144 


001403 






BEQ 


1$ 


2842 


010146 


042737 


170000 


172352 


BV.C 


#170000 ,S#I<IPAR5 


2843 


010154 


005016 




1$: 


CLR 


CR6) 


2844 


010156 


013/03 


177752 




MOV 


«#H1TMIS,R3 


2845 


010162 


005703 






TST 


R3 


2846 


010164 


001403 






BEQ 


FLDOA 


284 7 


010166 


104000 






ERROR 




2848 


010170 


000C74 






.WORD 


74 


2849 


010172 


001325 






.WORD 


ERRMSG 


2850 














2851 














2852 


01 174 






FLDOA: 






2853 


010174 


005716 






TST 


CR6) 


2854 


010176 


032737 


0000X0 


177752 


BIT 


*eiT03,atfHITMIS 


2855 


010204 


0C1003 






BNE 


100$ 


2856 


010206 


104000 






ERROR 




285 7 


010210 


OOOO 75 






.WORD 


75 


2858 
2859 

2860 


010212 


001325 






.WORD 


ERRMSG 














2861 


010214 


012700 


010000 


100$: 


MOV 


04096. ,R0 


2862 


010220 


012704 


000004 




MOV 


*eiro2,R4 


2863 


010224 


012705 


160000 




MOV 


#160000,R5 


2864 


010230 


020502 




1*: 


CMP 


R5.R2 


2865 


010232 


001410 






BEQ 


102$ 


2866 


0102?4 


005722 




2$: 


TST 


CR2)* 


2867 














2868 


010236 


030437 


177752 




BIT 


R4,a*ttITMIS 


2869 


010242 


001407 






BEQ 


3$ 


28 70 


010244 


077007 




101$: 


SOB 


R0,1$ 


2871 


010246 


104000 






ERROR 




28 72 


010250 


000076 






.WORD 


76 


28/3 


010252 


001325 






.WORD 


ERRMSG 


28 74 














28 75 














2876 














2877 


010254 


042702 


037776 


102$: 


BIC 


#37776, R2 


28 78 


010260 


000 765 






BR 


2$ 


2879 


010262 


010203 




3$: 


MOV 


R2.R3 


2880 


010264 


16270? 


020002 




SUB 


020002, R3 


2881 
28 HP 


010270 


020306 






CMP 


R3.R6 


2883 


0102/2 


001403 






BEU 


4$ 


2884 


010274 


104000 






ERROR 




2885 


010276 


000077 






.WORD 


n 


2886 
288 ' 


010300 


001325 






.WORD 


ERRMSG 


C.UU * 

," i«8 


010302 


005711 




4$: 


TST 


(Rl ) 


2889 


010304 


001315 






BNE 


n.oo 


2890 














2891 


010306 


022 /06 


137/76 


5$: 


CMP 


#13///b,R6 


2892 


010312 


001410 






BEQ 


V\ Dl 


289 ^ 


010314 


062 /06 


000002 




ADD 


#2,R#» 


2894 


010320 


062 702 


0Q0002 




ADD 


02.R2 



TEST 



SEQ 0059 



I BE IN THE TAG RAMS) TO KIPAR5. 

jIS THIS AN 18 BIT SYSTEM 

I BRANCH IF NOT 

{MODIFY FOR 18 BIT SYSTEM 

{LOAD TAG RAMS UITH DATA PATTERN. 

I SAVE CONTENTS OF HIT/MISS REG IN R3 

j HIT MISS REGISTER SHOULD BE CLEAR 

j BRANCH TO FLDOA 

j ALL ERRORS TO TRAP TO EMT VECTOR 

l UNIQUE ERROR NUMBER 

j ADDRESS OF ER30R MESSAGE 

I CACHE SYSTEM ERROR 
{ERROR!! WE GOT A CACHE HIT- WANTED A MISS 

j CHECK THAT CACHE WAS PROPERLY ALLOCATED. 
j WE'RE LOOKING FOR A HIT THIS TIME. 

!ALL ERRORS TO TRAP TO F.MT VECTOR 
{UNIQUE ERROR NUMBER 
{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
i ERROR! 

INIT RO TO COUNT 4KW0RDS. 

LOAD DATA INTO R4 TO SPEED UP BIT INST. 

LOAD DATA INTO R5 TO SPEED UP CK-> INST. 

IF TOP OF CACHE HAS BEEN REACHED 

GO RESET R2 TO 140000 

ENSURE THAT OTHER CACHE LOCATIONS 

WERE UNAFFECTED. 

ALL CACHE LOCATIONS SHOULD HIT, 

KEEP GOING UNTIL WE GET A MISS 

TEST THE NEXT CACHE LOCAT lON 

ALL ERRORS TO TRAP TO EM" VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
{ERROR! WE SHOULD HAVE GOTTEN A MISS 
{BEFORE FALLING THRU SOB 
{RESET R2 TO 140000 

J 

{SAVE CONTENTS OF R2 IN R3 

{SUBTRACT 20002 FROM CONTENTS OF R3 

: SHOULD BE EQUAL. IF NOT j THEN THE 

{CACHE RAM HAS BEEN ALTERED 

{GO TO NEXT TEST 

lALL ERRORS TO TRAP TO EMT VECTOR 

{UNIQUE ERROR NUMBER 

{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
{HAVE WE TRIED ALL PATTERNS AT THIS LOC? 
{GO GET NEXT ADORESS IF fES. 
{IF NOT GO DO THE: NEXT DATA PATTERN. 



{HAVE WE TESTED Ai.l 
: IF tES 1HEN GO W 
{LI 51- Lit T THE NEXT 
{BUMP R2 



. 4KW 
NEXT 



CACHE 
TEST 



LOCATIONS? 



ADDRESS 



15 



GLOBAL 


AM- AS 


MACU1 


30AC1052) 04-APR-84 10 


5 38 PAGE 60 


KDJL1A. 


MAC 03 -APR -84 


11: 56 


T22 


TAG RAN 


DATA RELIABILITY 


2895 


010324 


012/01 


1106/2 




:icv 


4TAGAD1+100000.R1 


2896 
280 7 

2896 


010330 


000167 


177600 




JMP 


FLDO 


010334 


012701 


1400^0 


FLD1; 


MOV 


4140000, Rl 


2890 


010340 


012737 


077600 172354 




MOV 


477600, S4KIPAR6 


2900 














290 1 


010346 


005767 


1704 70 




TST 


FLAG 


2902 


010352 


001406 






BEQ 


100$ 


2905 


010354 


042737 


17000C 172354 




BIC 


4170000, 84KIPAR6 


2904 


010362 


012737 


000002 177746 




MOV 


OBITOl.oJOCCR 


2905 


010370 


012702 


010000 


100$: 


MOV 


44096. ,R2 


2906 


010374 


005021 




1$: 


CI R 


CRD* 


2907 


010376 


07 7202 






SOB 


R2,l$ 


2908 


010400 


012701 


110704 




MOV 


4TAGAD2*100000,R1 


2909 


CI 0404 


012706 


120000 




MOV 


4120000, R6 


2910 


010410 


012702 


140002 




MOV 


4140002, R2 


2911 


010414 


012137 


172352 


FLD1A: 


MOV 


(R1)*,Q4KIPAR5 


2912 


010420 


005/67 


170416 




TST 


EL AG 


2913 


010424 


001403 






BEQ 


1$ 


2914 


010426 


042737 


170000 172352 




BTC 


41 70000, Q4K IPAR5 


2915 


010434 


005016 




1$: 


CLR 


CR6) 


2916 


010436 


013703 


177752 




MOV 


84HITMIS.R3 


2917 


010442 


0057CA 






TST 


R3 


2918 


010444 


001403 






BEQ 


El DIB 


2919 


010446 


104000 






ERROR 




2920 


010450 


000100 






.WORD 


100 


2921 


010452 


00.1325 






.WORD 


ERRMSG 


2922 














2923 


010454 






FLD1B: 






2924 


010454 


005716 




1$: 


TST 


CR6) 


2925 


010456 


032737 


000010 177 752 




BIT 


4BIT03,a4HITMIS 


2926 


010464 


001003 






BNE 


100$ 


2927 


010466 


104000 






ERROR 




2928 


010470 


000101 






.WORD 


101 


2920 


010472 


001325 






.WORD 


ERRMSG 


2950 














2933 


010474 


012700 


010000 


100$: 


MOV 


44096. ,R0 


2932 


010500 


012705 


160000 




MOV 


4160000, R5 


2933 


010504 


020502 




2$: 


CMP 


R5.R2 


2934 


010506 


001412 






BEQ 


104$ 


2935 


010510 


005022 




101$: 


CI R 


(R2)» 


2056 














293/ 


010512 


013703 


17 7752 


102$: 


MOV 


U4HirMIS,R3 


2958 


010516 


032703 


000004 




BIT 


09IT02.R3 


2939 


010522 


001407 






BEQ 


1C5$ 


2940 


010524 


077011 




103$: 


SOB 


R0,2$ 


2941 


010526 


104000 






ERROR 




2942 


010530 


000102 






. WORD 


102 


294 3 


010532 


001325 






.WORD 


ERRMSG 


2944 














294 5 














2946 














294 / 


010554 


042702 


037776 


104$ : 


BIC 


43 7 7/6,R2 


2948 


01054 


000/63 






BR 


101$ 


2949 


010542 


012704 


010512 


105$: 


MOV 


4102$,R4 


2950 


010546 


010267 


170332 




MOV 


R2.CURAUD 



TEST 



SEQ 0060 



TAG RAMS 



CONTROL REG 
WITH ONES 



{RESET DATA POINTER 
jOO IT AGAIN 

iINIT Rl 

I DATA IN KIPAR6 WILL CAUSE 

jTO BE SET TO ALL 1'S. 

{IS THIS AN 18 BIT SYSTEM? 

{BRANCH IF NOT 

{MODIFY FOR 18 BIT SYSTEM 

{SET DIAGNOSTIC BIT IN CACHE 

{SET UP TO FILL 4KW OF CACHE 

{WRITE THE CACHE 

{SET UP Rl AS A POINTER TO DATA TABLE 

{SET UP TESTADDRESS 

{SET UP R2 

{DATA IN KIPAR5 WILL BE WRITTEN INTO TAG RAM 

I.IS THIS AN 18 BIT SYSTEM? 

jBRANCHIF NOT 

{MODIFY FOR 18 BIT SYSTEM 

{WRITE TAG RAM WITH TEST DATA 

{STORE CONTENTS OF HIS MISS REGISTER 

{HIT/MISS REGISTER SHOULD BE CLEAR 

{BRANCH IF IT WAS A MISS 

{ALL ERRORS TO TRAP TO EMT VECTOR 

{UNIQUE ERROR NUMBER 

{ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 



TEST ADDRESS SHOULD NOW BE ALLOCATED IN CACHE 

DID IT HIT? 

BRANCH IF YES 

ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE EPROR NUMBER 

ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
COUNT 4 KUORDS 
IN R5 FOR FASTER CMP INST, 
Of CACHE HAS BEEN REACHED 

THEN GO RESET R2 TO 140000 

CHECK THE OTHER CACHE LOCATIONS 



INIT RO "TO 
STORE DATA 
IF THE TOP 



TO 



{SEE THAT 



STILL HIT 
REG IN R3 



THEY 
SAVE HIT MISS 
DID IT HIT? 

KEEP TESTING UNTIL A MISS OCCURS 
TEST THE NEXT CACHE LOCATION 
ALL ERRORS TO TRAP TO EMT VECTOR 
UNIQUE ERROR NUMBER 
ADDRESS OF ERROR MESSAGE 

{CACHE SYSTEM ERROR 
ERROR! SHOULD NOT HAVE FALLEN THRU 
SOB INST BEFORE CUTTING A MISS 



i 
I 
i 
i 
J 
i 

i 

j 

i 

i 

{SAVE ADDR OF MOV INSTRUCTION 

{SAVE R2 IN CURADD 



RESET R2 TO 140000 



IN R4 



r 



J 



GLOBAL 


AREAS 


MAO 1 1 


30AC1052 


) 04 -APR -84 10 


{38 PAG 


fc 61 


KDJ11A. 


MAC 03 -APR- 84 


11:36 




T22 


TAG RAM 


DATA RELIABILITY 


2951 


010552 


162767 


000002 


170324 




SUfj 


02, CUR ADD 


2952 


010560 


04276? 


177701 


170316 




BIC 


0177701, CURADD 


2953 


010566 


042704 


177701 






BIC 


0177701, R4 


2954 


010572 


020467 


170306 






CMP 


R4,CURADD 


2955 


010576 


001004 








BNE 


3$ 


2956 


010600 


032703 


000010 






BIT 


0BITO3.R3 


2957 


010604 


001401 








BEQ 


3$ 


2958 


010606 


000746 








BR 


103$ 


2959 


010610 


010203 






3$: 


MOV 


R2,R3 


2960 


010612 


162703 


020002 






sue 


420002, R3 


2961 


010616 


020306 








CMP 


R3,R6 


2962 


010620 


001403 








BEQ 


4$ 


296 5 


010622 


104000 








ERROR 




2964 


010624 


000103 








.UORO 


103 


2965 


010626 


001325 








♦ WORD 


ERRMSG 


2966 
















296/ 


010630 


005711 






4$: 


TST 


(Rl) 


2968 


010632 


001400 








BEQ 


6$ 


2969 










i 






2970 










j CHECK 


TO SEE IF ALL LOCATIONS HA 


2971 

29 72 
2973 










jADDRESS, RESET 


THE DATA POINTER 


010634 


022706 


137776 




6$: 


CMP 


0137776, R6 


2974 


010640 


001412 








BEQ 


8$ 


2975 


010642 


005062 


177776 




7$: 


CLR 


-2CR2) 


2976 


010646 


062706 


000002 






ADD 


02, R6 


2977 


010652 


062702 


000002 






ADD 


02, R2 


2978 


010656 


012/01 


110704 






MOV 


0TACAQ2*1QOOOO,R1 


2979 


010662 


000167 


17 7526 






JMP 


FLD1A 


2980 


010666 


000137 


010716 




8>: 


JMP 


6J0TSEND 


2981 










; 






2982 










| 






2983 


010672 


104200 






TAGAOi: 


.WORD 


104200 


2984 


010674 


010400 








.WORD 


010400 


2985 


0106/6 


1210O0 








.WORD 


121000 


2986 


010700 


042000 








.WORD 


042000 


2987 


010702 


000000 








.WORD 


000000 


2988 


010704 


73400 






TAGAD2: 


.WORD 


073400 


2989 


010/06 


167200 








. WORD 


167200 


2990 


010/10 


056600 








.WORD 


056t>00 


2991 


010712 


135600 








.WORD 


135600 


2992 
299.*. 


010714 


000000 








.WORD 


000000 


2994 


010/16 


00503 7 


17/746 




TSEND: 


CLR 


U0CCR 


2995 


010722 


005037 


i 77572 






CLR 


B05RO 


2996 


010/26 


012706 


00.1000 






MOV 


0STHOT.R6 


299 7 


010/32 


016/3 7 


1/00/2 


000114 


XXX; 


MOV 


5L0C00. n)f>114 


2998 
P99 l * 


010740 


016737 


1 70066 


000116 




MOV 


Sl.OCOl, &J0116 


■V)0\> 
















"5001 

















TEST 



SEQ 0061 



SUBTRACT 2 FROM R2 

ONLY INTERESTED IN BITS 1-5 

STRIP OFF UN-NEEDED BITS 

IF' BITS b-HN R4 AND CURADD ARE EQUAL? 

THEN 

TEST BIT03 IN HIT MISS REG 

IF ITS A HIT THEN DO THE NEXT ADDR 

STORE CONTENTS OF R2 IN R3 

SUBTRACT 20002 FROM R3 

IS R3» TO THE TEST ADDRESS. 

BRANCH IF THEY ARE EQUAL 

ALL ERRORS TO TRAP TO EMT VECTOR 

UNIQUE ERROR NUMBER 

ADDRESS OF ERROR MESSAGE 

j CACHE SYSTEM ERROR 
jWAS THIS THE LAST PATTERN FOR THIS LOCATION? 
jGO GET NEXT ADDRESS IF YES 



VE BEEN TESTED. IF NOT, GENERATE THE 
AND TEST THE NEXT CACHE LOCATION. 



NEW 



jHAVE WE TESTED ALL 4KU CACHE LOCATIONS? 

I IF \ES THEN GO TO END OF TEST 

jELSE WRITE ONES IN THE LOCATION LAST TESTED 

{GET THE NEXT ADDRESS. . , 

jBUMP R2 

■RESET DATA POINTER 

jDO IT AGAIN 

;JUMP OUT OF BANK 7 



ICLE4R THF CCR 
{TURN orr MMU 
jRFSTORE STACK POINTER 
iRfcSTQRE VECTOR 



I<!5 



GLOBAL ARf AS 
KO J 11 A. MAC 



3002 
300 3 
3004 
3005 
3006 
3007 
3008 
3009 
3010 
3011 
301? 
3015 
3014 
3015 
3016 
3017 
3018 
3019 
3020 
3021 
3022 
3023 
3024 
3025 
3026 
302 ? 
3028 
3029 
3030 
3031 
3032 
3033 
3034 
3035 
303*i 
303/ 
3038 
3039 
3040 
304 1 
3042 

304 3 
3044 
3045 
3046 
304/ 
3048 
3044 
3050 
3051 
3052 
3053 
3054 

305 5 
3056 
3057 



MACU1 30AC1052) 04-APR-04 10;38 PAGE 62 
03 -APR -84 11:36 T22 TAG RAM DATA 



RELIABILITY TEST 



SEQ 0062 



010746 
010746 
010752 
010754 
010760 
010760 
010764 
010772 
010774 
010776 
011000 
011002 
011004 
011006 
011012 
011016 
011020 
011024 
011030 
011032 
011034 
011036 
011040 
011042 
011044 
011044 
011046 
011050 

011054 

011062 
0110/0 
01.1076 
011104 
01 U12 
011120 
011126 
C1U34 

011:35 

011142 
011150 
011156 



005767 
001002 
104401 

00526 7 
042767 
005327 
000001 
003022 
012737 
000001 
010774 
104401 
016746 
104405 
104401 
013700 
001405 
000005 
004 710 
000240 
000240 
000240 

000137 
002176 
377 
0X1054 
005015 
026515 
042113 
040503 
042515 
051440 
020115 
047516 
000 
015 
046504 
020104 
021440 
011162 



170034 

011054 

1 70022 
100000 



011135 
167770 

011050 
000042 



377 

055103 
026502 
030512 
044103 
047515 
051531 
044504 
052123 

041412 

020102 

040520 

000 



170014 



000 

042113 
020060 
020061 
020105 
054522 
042524 
043501 
041511 

045532 
04 7105 
051523 



.MCALL IDMSG.ENDPAS 
.5BTTL END OF PASS ROUTINE 

j ;*M**i****i«*H**Ut*4AA**A*****M****M*t***MM** * * f + ******** 

{♦INCREMENT THE PASS NUMBER ($PASS) 

VINDICATE END OF -PROGRAM AFTER 1 PASSES THRU THE PROGRAM 

j*ir THERES A MONITOR GO TO IT 

;*IF THERE ISN'T JUMP TO RESTART 



$EOP: 

SKIPID: 

$EOPCT 5 
$ENDCT: 



$GET42: 
JENOAD: 

SDOAGN: 

*RTNAD: 
iENULL: 

MSG1; 



TST 
BNE 
TYPE 

INC 

BIC 

DEC 

.WORD 

BGT 

MOV 

,WORD 

IEOPCT 

TYPE 

MOV 

TYPDS 

TYPE 

MOV 

BEQ 

RESET 

JSR 

NOP 

NOP 

NOP 

JMP 

.WORD 

.BYTE 

.EVEN 

.ASCIZ 



*PASS 

SKIPID 

,MSG1 

tPASS 

0100000, $PASS 
(PC)* 

1 

IDOAGN 

(PC)*,8(PC)» 
1 

.MSG2 

$PASS,-(SP) 

, iENULL 
b)O42 ( R0 
tDOAGN 

PC.CRO) 



{ONLY TYPE MESSAGE AT END OF FIRST PASS 
I IF >0 THEN SKIP THE ID MESSAGE 
{ELSE TYPE THE ID MESSAGE 

}} INCREMENT THE PASS NUMBER 
{{DON'T ALLOW A NEG. NUMBER 
i jLOOP? 

I {RESTORE COUNTER 



; {SAVE $PAS5 FOR TYPEOUT 

{{GO TYPE --DECIMAL ASCII WITH SIGN 

{ {GET MONITOR ADDRESS 

{ {BRANCH IF NO MONITOR 

j {CLEAR THE WORLD 

{ {GO TO MONITOR 

j {SAVE ROOM 

! {FOR 

{{ACT 11 



3{PC). 

RESTART 

-1.1,0 



{ {RETURN 

{{NULL CHARACTER STRING 



<CR><LF>/CZKDM-B-0 KDJ11 CACHE MEMORY SYSTEM DIAGNOSTIC/ 



MSG2t .ASCI/ <CR»<LF>/CZKDMB END PASS 0/ 



EVt N 
SHTTl. 



TYPE ROUTINE 



[♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦•♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦*»**»**»A#* 
iftMl ITTkll 1 TH Tvnr A C O T -* k*l _ f r* A < >« k»f «» •* A# ■• ■ Mi i,- -r rrnuTi..! tr . . -v *-. . .v 



♦ROUTINE TO TYPE 



ASCI/ 



MESSAGE. MESSAGE MUST TERMINATE WITH A En TE 



L.5 



GLOBAL AREAS 
KDJ11A.MAC 



3058 

3059 
3060 

3061 
3062 
3063 
3064 
3065 
3066 

306 7 
3068 
3069 
3070 
3071 
3072 
3073 
3074 
3075 
3076 

307 7 
3078 
3079 
3080 
3081 
3082 
3083 
3084 
3085 
3086 

308 7 
3088 
3089 
3090 
3091 



NAClll 3OAU052) 
03 -APR -84 11:36 



04-APR-84 

TYPE 



10 j 38 PAGE 63 
ROUTINE 



SEQ 0063 



3092 
3093 
3094 
3095 
3096 
309 / 
3098 
3099 
3100 
3101 
3102 
3103 
3104 
3105 
3106 
310/ 
3108 
3109 
3110 
3111 
3112 
3113 



011162 
011166 
011170 
011172 
011174 
011176 
011202 
011210 
?U212 
' 1220 
U222 
011226 
011232 
011234 
011242 
011244 
011246 
011250 
011252 
011254 
011260 
011262 
011266 
011270 
0112/4 
011276 
011300 
011302 
011304 
011310 
011312 
011316 
011322 
011324 

011330 
011334 
011336 
011342 
011346 



10576? 
100002 
000000 
000430 
010046 
017600 
122767 
001011 
132767 
001405 
010067 
004767 
000000 
132767 
001003 
112046 
001005 
005726 
012600 
062716 
000002 
122/16 
001430 
122716 
001006 
005726 
104401 
001403 
105067 
000755 
004 76 7 
126726 
001350 
016746 

105366 
002770 

004767 
105367 
000770 



000343 



000002 
000001 

000100 

000004 
001622 



000002 
000011 
000200 

000202 

000056 
000206 

000176 

000001 

000032 
000144 



167610 
167601 



000040 167557 



$NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTtR 
IFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
iFILLC CONTAINS THE CHARACTER TO FILL AFTER. 



} *THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
i* 

{ + 
;* 
i* 
. + 
j* 
} + 

5* 

; * 
j* 



iNOTEl 
^N0TE2 
'N0TE3 



■CALL: 

1) USING A 
TYPE 

'OR 

TYPE 
MESAOR 



TRAP INSTRUCTION 
.MESADR 



nMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 



$TYPE 



1$: 



61$ 
62$ 

2$: 



60$ 
3$: 

4*: 



5$ 
6$ 



7$ 



TSTB 
BPL 

HALT 

BR 

MOV 

MOV 

CMPB 

BNE 

BITB 

BEQ 

MOV 

JSR 

.WORD 

BITB 

BNE 

MOVB 

BNE 

T5T 

MOV 

ADD 

RTI 

CMPB 

BEQ 

CM2B 

BNE 

TfiT 

TYPE 

iCRLF 

CLRB 

BR 

JSR 

CMPB 

BNF 

MOV 

DECB 
BLT 
JSR 
DECB 

BR 



STPFLG 

1$ 

3* 

RO, (SP) 

S2(SP),R0 

OAPTENV. $ENV 

62$ 

*APTSPOOL,$ENVM 

62$ 

R0,61$ 

PC. $ATY3 



OAPTCSUP. tENVM 

60$ 

(R0)», -(SP) 

4$ 

(SP)* 

(5P)*,R0 

0? . C SP ) 

OHT.CSP) 
8$ 

OCRI.F.CSP) 
5$ 

(SP)* 



JCHARCNT 

2$ 

PC. $TYPEC 

$FIL.L.C.CSP)* 

2$ 

SNULL. -(SP) 

1CSP) 
6 J 

PC. JTiPEC 

ICHARCNT 

7$ 



! 1 

} J 
i J 

\ I 
I I 
I I 
I I 
5 



t J 

J i 
t J 
s » 
t t 
; ; 
; ; 

I f 

i ; 



IS THERE A TERMINAL? 

BR IF YES 

HALT HERE IF NO TERMINAL 

LEAVE 

SAVE RO 

GET ADDRESS OF ASCIZ STRING 

RUNNING IN APT MODE 

NO, GO CHECK FOR APT CONSOLE 

SPOOL MESSAGE TO APT 

NO, GO CHECK FOR CONSOLE 

SETUP MESSAGE ADDRESS FOR APT 

SPOOL MESSAGE TO APT 

MESSAGE ADDRESS 

APT CONSOLE SUPPRESSED 

YES, SKIP TYPE OUT 

PUSH CHARACTER TO BE TYPFD ONTO STACK 

BR IF IT ISN'T THE TERMINATOR 

IF TERMINATOR POP IT OFF THE STACK 

RESTORE HO 

ADJUST RETURN PC 

RETURN 

BRANCH IF <HT> 



} {BRANCH IF NOT <CRLF> 

I {POP <CR><LF> EQUIV 
j }T*PE A CR AND LF 



» » 
t i 
• • 

i i 



i i 
i » 
i i 
i I 



CLEAR CHARACTER COUNT 

GET NEXT CHARACTER 

GO TYPE THIS CHARACTER 

IS IT TIME FOR FILLER CHARS.? 

IF NO GO GET NEXT CHAR. 

GET OF FILLER CHARS, NEEDED 

AND THE NULL CHAR. 

DOES A NULL NEED TU BE HPED? 

BR IF NO- -GO POP THE NULL OFF OF 

GO TrPE A NULl 

DO NOT COUNT AS A COUNT 

LUOP 



STACK 



{HORIZONTAL TAB PROCESSOR 



M5 



GLOBAL AREAS 
KDJUA.MAC 



MACU1 30AU052) 
03-APR-84 11:36 



04 - APR. 84 10:38 PAGE 64 
TYPE ROUTINE 



SEQ 0064 



3114 
3115 
3116 
3117 
3118 
3119 
3120 
3121 
312,? 
3123 
3124 
3125 
3126 
3127 
3128 
3129 
3130 
3131 
313? 
3133 
3134 
3135 
3136 
3137 
3138 
3139 
3140 
3141 
3142 
3143 
3144 
3145 
3146 
3147 
3148 
3149 
3150 
3151 
3152 
3153 
3154 
3155 
3156 
3157 
3158 
3159 
3160 
3161 
3162 
3163 
3164 
3165 
3166 
316/ 
316;* 
3169 



011350 
011354 
011360 
011366 
011370 
011372 
011374 
011374 
011400 
011402 
011406 
011412 
011416 
011420 
011420 
011424 
011426 
011432 
011436 
011442 
011444 
011444 
011446 
011446 
011452 
011454 
013462 
011470 
011472 
011476 
011500 
011506 
011510 
011512 
011514 

011516 

011520 
011522 
011524 
011526 
011527 
011530 
011531 
011532 
011533 



112716 
004 767 
132767 
001372 
005726 
U00724 

105777 

100022 
017746 
042716 
122716 
001012 

105777 
100375 
117716 
042 7 16 
122716 
001366 

005726 

105777 

100375 
116677 
122766 
001003 
105067 
000406 
122766 
001402 
105227 
000000 
000207 

177560 
177562 
17 7564 

177566 
000 
002 
012 
000 
077 
01? 

01153b 



000040 
000014 
000007 000124 



ooo ne 

0""*0112 
1 7600 
000023 



000072 

C00066 
177600 
000021 



000050 

000002 000042 
000015 000002 

000014 

000012 000002 



000 



8$ 
9$ 



HYPEC: 



101 



102$ 
10*: 



MOVB 

JSR 

BITB 

BNE 

TST 

BR 

FSTB 
BPL 

MOV 
BIC 
CMPB 
BNE 

T5TB 

BPL 

MOVB 

BIC 

CMPB 

BNE 

TST 



TSTB 
BPL 
MOVB 
CMPB 
BNE 
CLRB 
BR 
1$: CMrO 
B-.f 
IAL3 
JCHARCNT: .WORD 
STYPEX; RTS 



$TKS: 
$TKB: 
$TPS: 

$TPB: 

$NULL: 

I FILLS 

$FILLC 

ITPFLG 

SQUES: 

$LF : 

.SBTTL 



.WORD 

.WORD 

.WORD 

.WORD 

.BYTE 

.BYTE 

.BYTE 

.BYTE 

.ASCII 

.ASCIZ 

.EVEN 

CONVERT 



«' ,(SP) 

PC, $TYPEC 

47,$CHARCNT 

9$ 

(SP)* 

2$ 

StTKS 

10$ 

8$ 1KB, -CSP) 

*177600 f (SP) 

fl$XOFF,(SP) 
102$ 

8$TKS 

101$ 

s$t:<b,csp) 

*177600,CSP) 
«$XON,(SP) 

101$ 

(SP)* 

a$TPS 

10$ 

2CSP),Q$TPB 

0CR.2CSP) 

1$ 

JCHARCNT 

$TYPEX 

OLE ,2(SP) 

$TYPEX 

(PC)* 



PC 

177560 
17 7562 
177564 
177566 


2 

12 


"7 " 

<12> 



j {REPLACE TAB WITH SPACE 

j {TYPE A SPACE 

j {BRANCH IF NOT AT 

j j TAB STOP 

l j POP SPACE OFF STACK 

i jGET NEXT CHARACTER 

I {CHAR IN KYBD BUFFER? 

I i BR IF NOT 

{ j GET CHAR 

j {STRIP EXTRANEOUS BITS 

; j WAS CHAR XOFF 

{ {BR IF NOT 

j {WAIT FOR CHAR 

} {GET CHAR 
{{STRIP IT 
j {WAS IT ,<0N? 
j {MR IF NOT 

i {FIX STACK 

{{WAIT UNTIL PRINTER IS READY 

{{LOAD CHAR TO BE TYPED INTO DATA REG. 

5 5 IS CHARACTER A CARRIAGE. RETURN? 

j { BRANCH IF NO 

j {YES- -CLEAR CHARACTER COUNT 

EXIT 

IS CHARACTER A LINE FEED? 
j {BRANCH IF YES 
} {COUNT THE CHARACTER 
} {CHARACTER COUNT STORAGE 



i • 
i i 
i i 
J J 
» • 
: j 



jMJOOOl 
MJD001 
MJD001 
MJD001 
MJD001 
MJD001 
MJD001 
MJ0001 
MJD001 
MJD001 
MJD001 
MJD001 
MJD001 
MJD001 
MJD001 
MJD001 

{MJD001 



TTY KDB STATUS jMJDOOl 
TTY KBD BUFFER jMJDOOl 
TTY PRINTER STATUS REG. ADDRESS 
TTY PRINTER BUEFER REG. ADDRESS 
CONTAINS NULL CHARACTER FOR FILLS 
CONTAINS OF FILLER CHARACTERS REQUIRED 
INSERT FILL CHARS. AFTER A "I INE FEED" 
"TERMINAL AVAILABLE' 1 FLAG fBIT<07> =0- YES ) 
QUESTION MARK 
LINEFEED 



(UNARY TO DECIMAL AND TYPE ROUTINE 



} ;+*♦♦♦♦*♦*♦♦♦**♦**♦♦♦ + ♦*** + * + ************fi** **♦**** + **** + * + *** + * 
»*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIi 
{♦SIGNED DECIMAL (ASCII) NUMBER AND TYPE II. DEPENDING ON WHETHER THE 
{♦NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WIl.l Bt TrPEL) 
{♦BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING i>EROS WILL ALWAYS BE 
{♦RtPLACED WITH SPACES. 
{♦CALL: 



N5 



GLOBAL ARFAS 
KDJ11A.HAC 

31/0 
3171. 
3172 



MAC > 1.1 30AC.052) 
03 -APR -84 1 -^ 



oa 



04 -APR -80 10:38 PAGE:" 65 

CONVERT BINARY TO 0F.CIMA1 



AND TYPE ROUTINE 



SEQ 0065 



31 O 

3174 

3175 
3176 
3177 
3178 
3179 
3180 
3181 
3182 
3183 
3184 
3185 
3186 
3187 
3188 
3189 
3190 
3191 
3192 
3193 
3194 
3195 
3196 
3197 
3198 
3199 
3200 
3201 
320? 
32u3 
3204 
3205 
3206 
320/ 
3208 
3209 
3210 
3211 
3212 
3213 
3214 
3215 
3216 
3217 
3218 
3219 
3220 
3221 
322.' 
3223 
3224 
3225 



011536 
011536 
011540 
011542 
011544 
011546 
011550 
011554 
011560 
011562 
011564 
011572 
011574 
011600 
011604 
• 1606 
im1612 
011614 
011616 
011620 
011622 
011624 
01 1626 
011630 
01163d 
011634 
011636 
011640 
11646 
011652 
011656 
011660 
011662 
011666 
011670 

011672 
011674 
011676 
011700 
011702 
011/10 
011/12 
011/14 
011716 
011720 
011/22 
011724 
011/30 
011/36 
011/40 
011/42 
Oil /44 
011746 



010046 
010146 
010246 
010346 
010546 
012746 
016605 
100004 
005405 
112766 
005000 
012703 
112723 
005002 
016001 
160105 
002402 
005202 
0007 74 
060105 
005702 
001002 
105716 
100407 
106316 
103003 
116663 
052/02 
052 702 
110223 
005/20 
020027 
002746 
003002 
010502 
000764 
105726 
100003 
116663 
105013 
012605 
012603 
012602 
012601 
012600 
104401 
016666 
012616 
0000<V 
023420 
001750 
000144 



$TYPDS: 



020200 
000020 



000055 000001 

011752 

000040 

011742 



000001 
000060 
000040 



OOOOIO 



177777 



1$ 



2$ 
3$ 



4$ 



5$ 



6$ 
7$ 



177777 177776 



8$ 



9$ 



Oil /52 

000002 000004 



SDTHl. 



MOV 
TYPDS 



MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

BPL 

NEG 

MOVB 

CLR 

MOV 

MOVB 

CLR 

MOV 

SUB 

BLT 

INC 

BR 

ADD 

TST 

BNE 

TSiB 

BMI 

ASLH 

BCC 

MOVB 

BIS 

BIS 

MOVB 

TST 

CMP 

BLT 

BGT 

MOV 

BR 

TSTB 

BPL 

MOVB 

CLRB 

MOV 

MOV 

MOV 

MOV 

MOV 

1 "i PE 

MOV 

MUV 

HTI 

10000 

1000. 

100. 



NUM , - ( SP ) 



RO.-CSP) 

Rl.-CSP) 

R2.-CSP) 

R3.-CSP) 

R5.-CSP) 

420200. CSP) 

20CSP),R5 

1$ 

R5 

0' -,1CSP) 

RO 

#$DBLK,R5 

0' ,CR3)* 

R2 

$0TBLCR0),R1 

R1.R5 

4$ 

R2 

3$ 

R1.R5 

R2 

5$ 

C SP ) 

7$ 

CSP) 

6$ 

1CSP), -HR3) 

«'0,R2 

0' ,R2 

R2,CK3)f 

(RO)* 

RO.ttlO 

2$ 

6* 

R5.R2 

6$ 

( SP ) * 

s* 

HSP), 2(R3> 
(R3) 

CSP)* ,R5 
CSP)* ,H5 
CSP)* ,R2 
tSP)* ,R1 
C SP ) * , RO 
, 5UBI.K 
2C i :P),4(SP) 
CSP)*, CSP) 



l j PUT THE BINARY NUMBER ON THE STACK 
j sGO TO THE ROUTINE 



PUSH RO ON STACK 

PUSH Rl ON STACK 

PUSH R2 ON STACK 

PUSH R3 ON STACK 

PUSH R5 ON STACK 

SET BLANK SWITCH AND SIGN 

GET THE INPUT NUMBER 

BA IE INPUT IS POS. 

MAKE THE BINARY NUMBER POS. 

MAKE THE ASCII NUMBER NEO. 

ZERO THE CONSTANTS INDE,\ 

SETUP THE OUTPUT I- OINTEr* 

SET THE FIRST CHARACTtR TO A BLANK 

CLEAR THE BCD NUMBER 

GET THE CONSTANT 

FORM THIS BCD DIGIT 

BR IE DONE 

INCREASE THE BCD DIGIT BY 1 

ALD BACK THE CONSTANT 

CHECK IE L1CD DIGTT*0 

PALL THROUGH If 

STILL DOING LEADING O'S? 

OR IE YES 

MSD? 

BR T E NO 

YES -SET THE SIGN 

MAKE THE BCD DIGIT 

MAKE IT A SPACE IE 

PUT THIS CHARACTER 

JUST INCREMENTING 

CHECK THE TABLE INDEX 

GO DO THE NEXT DIGIT 

GO TO EXIT 

GET THE LSD 

GO CHANGE TO ASCII 

WAS THE LSD THE EIRST NOK ZERO? 

BR IF NO 



ASCII 

NOT Al READY A DIGIT 

IN THE OUTPUT BUEFER 



YES 
SET 

POP 
PUP 
POP 
POF 
POP 
NOW 



■SET THE SIGN EOR TYPING 
THE TERMINATOR 
STACK IN'iO MS 

INTO R3 

INfO R2 

INTO Rl 

INTO RO 



STACK 
STACK 

STACK 
STACK 



TYPE THE NUMBER 



ADJUST THF STACK 
RETURN TO USER 



p,<> 



Gl 00 Ai. 


ARt AS 


MACUl 


50 A U 05/) 04 -A 


KDJ11A. 


MAC 03-APW 84 


11:36 


3//6 


011750 


oooot/ 




3/// 


01175/ 


000004 




3//A 








3//9 








3/50 








3/31 








3/5/ 








3/55 








3/54 








3/35 








3/3h 








3/3; 








3/38 








3/3 1 * 








3/40 








3/41 








3/4/ 








3/4 * 








3/44 








3/4 5 








3/46 








3/4/ 








3/48 








3/44 








3/50 








3/51 








32b/ 








3/53 


01176/ 


017646 


000000 


3/54 


011766 


11666 7 


0OO0O1 ooo/u 


3/55 


0117 74 


11/66 7 


00020 7 


3/56 


01/000 


06/716 


00000/ 


3/5/ 


01/004 


000406 




3 >S8 


01/006 


11/767 


000001 000171 


3/59 


01/014 


11/767 


0OO0O6 00016^ 


3/60 


01/0// 


11/767 


0O0005 000154 


3/6\ 


01/030 


010346 




3/6/ 


01/03/ 


010446 




3/63 


01/034 


010M6 




3/64 


01/056 


116704 


000145 


3/65 


01/04/ 


00S404 




3/66 


01/044 


06/704 


000006 


3/67 


01/050 


110467 


00013/ 


3/63 


01/054 


116704 


0001^5 


3/69 


01/060 


016605 


00001/ 


3/70 


01/064 


005003 




3/71 


012066 


006105 




3/// 


01/070 


000404 




3// 3 


01/0 7/ 


006105 




3/ 74 


01/0 74 


006105 




3/ 75 


01/0 76 


006105 




3/76 


01/100 


010503 




3/ 1 r 


01/10/ 


006105 




3/M 


01/104 


105 56/ 


0000 76 


3/79 


01/110 


100016 




3/ HO 


01/11/ 


04//0? 


i 77770 


3*0 i 


01/116 


00100/ 





\ 84 10 j 38 PAOI 66 
CONVERT BINARY TO DFlIMAI 



AND TYPE ROUTINE 



5EU 0066 



SDBLK: 
.SBTTL 



10. 

.BL.KW 
BINARY 



4 

TO 



OCTAl, (ASCII) ANO TYPE 



♦ THIS ROUTINC IS USED TO CHANGE A 16-BIT BINARY NUMBFR TO A 6 DIGIT 
♦OCTAL (ASCII) NUMBFR AND TYPE IT, 

•ITYPOS ENTER HERE TO SETUP SUPPRESS /EROS ANO NUMBER OF DIGITS TO TrPF 

♦CALL: 

♦ MOV NUM,-(5P) i (NUMBER TO BE TYPED 

♦ TYPOS i i CALL FOR TYPEOUT 

♦ .HtTF N i |N-1 TO 6 FOR NUMBER OF DIGITS TO TYPE 

♦ .BYTE M j iM-1 OR 

♦ i i 1-TyPF. LEADING ZEROS 

♦ uO-SUPPRESS LEADING /EROS 

4 

♦ITYPON-- -ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

♦ITyPOS OR ITYPOC 

♦CALL: 

♦ MOV NUM. (SP) uNUMBE.R TO BE TrPED 

♦ TYPON i i CALL FOR TYPEOUT 



♦ITyPOC 
•CALLs 

• HOV 

* TYPOC 



ENTER HERE FOR TYPEOUT Of A 16 BIT NUMBER 



ITYPOS: 



ITY"0C: 
ITYPONs 



II 



J*i 



MOV 

MOVB 

MOVB 

ADD 

BR 

MOVB 

MOVB 

MOVB 

MOV 

MOV 

MOV 

MOVB 

NEG 

ADD 

MOVB 

MOVB 

MOV 

CLR 

ROl 

BR 

ROl 

ROt 

ROl 

MOV 

ROt 

Dt CB 

BPl 

F1IC 

mi 



NUM. (SP) 



S(SP), (SP) 

l(SP),IOf ILL 

(SP)*, I0M0DE*1 

»Z , ( SP ) 

ITYPON 

•l,IOf ILL 

#6»I0M0DE*1 

05.IOCNT 

R3, -(SP) 

R4, -(SP) 

R5, (SP) 

I0M00E »1,R4 

R4 

*6,R4 

R4 , IOMO0J 

»0f IL L ,R4 

1/(SP),R5 

R3 

R5 

li 

MS 

RS 

RS 

R5.R5 

RS 

lOMOOt 

71 

oi rmoiR3 

At 



NUMBER TO BE TtPED 
CALl FOR TYPEOUT 

PICKUP THf MOOE 

LOAD ZERO FILL SWITCH 

NUMBFR OT DIGITS TO TYPE 



ADJUST RERHN 



ADDRESS 



ZERO FILL SWITCH 
SIXC6) DIGITS 
ITERATION COUNT 



SET THE 
SET FOR 
SET THE 
SAVF R5 
SAVE R4 
SAVE R5 
GET TFfF NUMBER Of DIGITS TO TYPE 

SUBTRACT IT TOR MAX. ALLOWED 

SAVE IT TOR USE 

GET THE ZERO FILL SUI TCH 

PICKLE 1H£ INPUT NUMBER 

CLEAR THC: OUTPUT WORD 

ROTATE MSB TNTO "C" 

GO 00 MSB 

FORM THIS DIGIT 



jGM t SB OF THIS DIGIT 
I TiPt THIS DIG I T > 
|HH I* NO 
I L.I I RID 0» JUNK 
iTtSI FOR 



GLOMAL AULAS 

KDJllA.MAC 



oJwnwM 



3CA11052) 04 -APR 



BWAR*°tfl 8 0C?fle E (W 



Ct 



CII) AND TYPE 



SEU 0067 



3282 
3283 
3284 
3285 
3286 
3287 

3288 

3289 
3290 
3291 
32*2 
3293 
3291 
3295 
3296 

329/ 

3298 

3299 

3300 
3301 
3 30c 1 
3303 
3 304 
330f> 
3306 
330/ 
3 306 
3309 
3310 
3311 
331? 
331? 
3314 
3315 
3316 
3317 
3M8 
3319 
3520 
3321 
3 32 c' 
3 3? 3 
3324 
3 325 
3326 
332/ 
3328 
3329 
33 50 
3331 
3552 
3355 
33 34 
3 5 55 
33 3*. 
3337 



012120 
012122 
012124 

012126 
012132 
012136 
012142 
012146 
012152 
012154 
012156 
012160 
012162 
012164 
012166 
012170 
012176 
012200 
012202 
012203 
012204 
012205 
012206 



012210 
012216 
012220 
012224 
012226 
012232 
012236 
012242 
012244 

012252 

012254 
012260 
012264 
0122 70 
012272 
0122/6 
012300 
012302 
012306 

012310 
012314 



005 704 
001405 
005204 
052703 

052703 

110367 

104401 

105367 

00334 7 

002402 

005204 

000744 

012605 

012604 

012603 

0166, S 

012616 

000002 

000 

000 

000 

000 

000000 



022 767 
001074 
105777 
100071 
117746 
042716 
022 726 
001062 
126727 
001456 

104401 
.104401 
016746 
104402 
104401 
005046 
C05046 

1057;; 

1003/5 

1 1 //«* 

042/16 



000060 
000040 
000040 
012202 
000032 



000002 000004 



0O0176 166630 

17 7272 

177266 
17 7600 
000007 

000514 000001 



012/35 
012742 
16570o 

012753 



177210 



1 / /204 
1/7600 





TST 


R4 




BEQ 


51 


4»: 


INC 


R4 




BIS 


0'0,R3 


5$: 


BIS 


** ,R3 




MOVB 


R3 4 8* 




TYPE 


,6$ 


7$j 


DECB 


IOCNT 




BGT 


2i 




BLT 


6$ 




INC 


R4 




BR 


2$ 


6$: 


MOV 


(SP)»,R5 




MOV 


CSP)».R4 




MOV 


(SP)»,R3 




MOV 


2(SP),4(SP) 




MOV 


CSP)* ( (SP) 




RTI 




8$; 


.BYTE 







.BYTE 





I0CNT: 


.BYTE 





$ 0^ ILL: 


.BYTE 





IOMODE j 


.WORD 





.SBTTL. 


TTY INPUT ROUTINE 



SUPPRESS THIS 0? 

BR IF YES 

DON'T SUPPRESS ANYMORE 0*5 

MAKE THIS DIGIT ASCII 

MAKE ASCII IE NOT ALREADY 

SAVE FOR TYPING 

GO TYPE THIS DIGIT 

COUNT BY 1 

BR IF MORE TO DO 

BR IF DONE 

INSURE LAST DIGIT ISN'T A BLANK 

GO DO THE LAST DIGIT 

RESTORE R5 

RESTORE R4 

RESTORE R3 

SET THE STACK FOR RETURNING 

RETURN 

STORAGE FOR ASCII DiGIT 

TERMINATOR FOR TYPE ROUTINE 

OCTAL DIGIT COUNTER 

ZERO FILL SWITCH 

NUMBER OF DIGITS TO TYPE 



.ENABL 



LSB 



i*SOFTWARE SWITCH REGISTER CHANGE ROUTINE, 
l*ROUTINE IS ENTERED FROM TM£ TRAP HANDLER, ANO WILL 
{♦SERVICE THt TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER 
l*WHEN OPERATING IN TTY FLAG MODE. 



TRAP CALL 



ICKSWR; 


CMP 


*SWREG,SWR , 


ilS THt SOFTSWR SELECTED? 




SNt 


151 i 


1 BRANCH IF NO 




(STB 


SITKS i 


iC'HAR THt. RE ? 




BPl 


151 i 


lit NO. DON'T WAIT AROUND 




MOVB 


HITKB.-(SP) i 


j SAVE THE CHAR 




PIC 


**cwmsp> i 


(STRIP-OFF THE ASCII 




CMP 


9 ; , c sp ) ♦ i 


lis IT A CONTROL G? 




BNf. 


151 , 


iNH, RETURN TO USER 




CMPB 


JAUTOB.frl j 


lARE WE RUNNING IN AU TO -MODE 7 




BEQ 


15$ i 


1 BRANCH IF YES 




TYPE 


, ICNTIU i 


lECHO THE CONTROL -G (Hi) 


IGTSWRj 


T tPf 


, IMSWR , 


iTYPt CURRENT CONTENTS 




MOV 


SWHt li, (SP) j 


jSAVE SWREG F0« TyPEOUT 




1 rPOC 




tGO TYPE --OCTAL ASCIUALL DIG 




I tPE 


, 1 MNE W , 


, PROMPT FOR NEW SWR 


19$; 


CI R 


• ( SP ) i 


iCl EA3 COL INTER 




CI.R 


( SP ) j 


j THt Ht'.U SWR 


7*t 


T5TB 


BITKS j 


j CHAR THERE ? 




BPl 


'* J 


|U N01 TRY AGAIN 




MOVB 


bJITKB, (SP) | 


(PICK 1>P CHAR 




BIC 


0tC177 4 <SP) , 


iMAKf IT 7-UIT ASCII 



C OUAl AKt AS 
KUJ11A.MAC 



c^MAT,^ 



30A11Q52) 04 APR. 



W iAPo? 8 RoG^b 6B 



Db 



SEQ 0066 



5538 
3539 
3540 
3341 
3342 
3343 
3344 
3345 

3346 

334 7 

3348 

3349 

3350 

335) 

335? 

3353 

3354 

3355 

3356 

3357 

3358 

3359 

3360 

3361 

3362 

3363 

33v4 

3365 

^36*. 

33*-./ 

3368 

3369 

3370 

3371 

337c? 

3373 

3374 

3375 

3376 

3377 

3378 

3379 

3580 

3381 

338? 

3*83 

3 384 

3 585 

33Mb 

3.T87 

3388 

3389 

3 390 

339] 

3 39? 

3393 



012320 
012324 
0123?6 
01233? 
012336 



012340 
012344 
012346 
012352 
012354 
012362 
012366 
012372 
012400 
012402 
012410 
012412 
012416 
012422 
012424 
012430 
012432 
0:.2436 
012442 
012444 
012446 
012*30 
012'' 52 
'"?456 
0U:46? 
012464 
012470 



0124 7? 

0124 74 
012502 
012506 
012510 
012516 
012524 
012532 



021627 
001005 
104401 
062706 
000757 



02162? 
0010.2 
005/ 6 
00l4o;- 

016677 
062706 
104401 
126727 
001003 
012777 
000002 
004767 
021627 
002420 
021627 
003015 
042726 
005 766 
001403 
006316 
006316 
006316 
005266 
05661.6 
000707 
104401 
000720 



011646 
016666 
105/7 7 
100375 
117 766 
04?7b6 
026627 
001013 



000025 

01273y 
000006 



000015 

000004 

000002 
000006 
001403 
000 36 7 

000 100 

176756 
000060 

000067 

000060 
000002 



000002 
177776 

011532 



000004 
177010 

17 7004 
1 7 7600 
000004 



166464 

000001 
177106 



9$ j 



20*5 



10$ 



11$ 
14$ 



15$ 
16$ 



17$ 



18$ 



,DSABl 



THIS 
CALL 



000002 



000004 
000004 
000023 



$RDCHR 
1$: 



CMP ( SP ) , 025 

BNE 10$ 

TYPE , $CNTLU 

ADD 06, SP 

BR 19$ 



CMP CSP),<?15 

BNE 16$ 

TS1 4(SP) 

BEQ ill 

MOV 2(SP) t 8SWR 

ADD *6,SP 

TYPE . iCRLF 

CMPB IINTAG.01 

BNE 151 

MOV $100,&$TKS 

RTI 

JSR PC,$TYPEC 

CMP (5P),*60 

BLT 13$ 

CMP (SP),W7 

BGT 18$ 

BIC 060, (SP)* 

TST 2CSP) 

BEQ 17$ 

ASl (SP) 

ASL (SP) 

ASL (SP) 

INC 2(SP) 

BIS -P(SP).CSP) 

BR ** $ 

TYPE ilQUES 

BR 20$ 

l.SB 



lIS IT A CONTROL -U? 

I BRANCH IF NOT 

|YFS, ECHO CONTROL -U ( t\J) 

i IGNORE PREVIOUS INPUT 

jLET'S TRY IT AGAIN 



FIRST CHAR? 



AND 


<LF> 


TTY 


KBO INTERRUPTS? 


NOT 




TTr 


KBD INTERRUPTS 



IS IT A <CR>? 

BRANCH IF NO 

YET), IS IT THE 

BRANCH IE YES 

SAVE NEW SWR 

CLEAR UP STACK 

ECHO <CR> 

RE -ENABLE 

URANCH IF 

RE -ENABLE 

RETURN 

ECHO CHAR 

CHAR < 0? 

BRANCH IF 

CHAR > 7? 

BRANCH IF 

STRIP-OFF 

IS THIS THE FIRST CHAR 

BRANCH IF YES 

NO, SHIFT PRFSENT 

CHAR OVER TO MAKE 
ROOM FOR NEW ONE. 

KEEP COLNT OF CHAR 

SET IN NEW CHAR 

GET THE NEXT ONE 

T1PE ?<CR><LF> 

SIMULATE CONTROL -U 



YES 

YES 

ASCII 



ROUTINE WILL INPUT A SINGLE CHARACTER FROM THF TTY 



RDCHR 
RETURN 



MOV 

MOV 

TSTB 

BPL 

MOVH 

BIC 

CMP 

BNE 



HERE 



(SP), (SP) 

415P),2(SP) 

a$TKS 

1$ 

WITKB,4( t *.P1 

<MC< 1 7/>,4(SP) 

4(SP),023 

3$ 



I i INPUT A SINGLE CHARACTER FROM THE TTY 
mCHARACTFR IS ON THE STACK 
nWlTH PARITY BIT STRIPPED OFF 



DOWN THE 
PS 



j i PUSH 

j t SAVE THE 

j l WAIT FOR 

I j A CHARACiER 

l j READ THE fT> 

I I GET RID OF JUNK 

II IS IT A CONTROL 
l j BRANCH IF NU 



PC 



1* 

s? 



AN> 



GLOBAL ARIAS 
KDJUA.NAC 



F6 



MACUV 30AC1O52) 
03-APR-84 li ; 36 



04-APR-84 10:38 PAGE 70 

TRAP DECODER 



SEQ 0070 



3450 
3451 

34 52 

3453 
3454 
3455 

3456 
3457 
3458 
3459 
3460 
3461 
3462 
3463 
3464 
3465 
3466 
3467 
3468 
3469 
34 70 
3471 
34 72 
34 73 
34 74 
34 75 
34 76 
3477 
34 78 
3479 
3480 
3081 
3482 
3483 
3484 
3485 
3486 
348/ 
3488 
3489 
3490 
3491 
3492 
3493 
3494 
3495 
3496 
349/ 
3498 
3499 
3500 
3501 
350? 
3503 
3504 

3505 



012766 
012770 
012774 
012776 
013000 
013002 
013006 



013010 
013012 
013020 



01.3024 

013026 
015030 
013032 



010046 
016600 
005740 
111000 
006300 
016000 
000200 



011646 
016666 
000002 



000002 



013022 



000004 000002 



013010 
011162 
01?006 
011762 
012022 



{♦AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
{♦OF THE DESIRED ROUTINE, THEN USING THE ADDRESS OBTAINED IT WILL 
:*G0 TO THAT R0U T INE, 



STRAP 



MOV 


RO.-CSP) i 


MOV 


2CSP).R0 , 


TST 


-CRO) , 


MOVB 


(RO).RO i 


ASL 


RO { 


MOV 


iTRPADCRO),RO i 


RTS 


RO i 



{SAVE RO 

iGET TRAP ADDRESS 

j BACKUP BY 2 

I GET RIGHT bYTE OF TRAP 

{POSITION FOR INDEXING 

;TNDEX TO TABLE 

j GO TO ROUTINE 



ssTHIS IS USE TO HANDLE THE "GETPRI" MACRO 



$TRAP2: MOV 

MOV 
RTI 



(SP).-CSP) 

4(SP)>2CSP) 



j {MOVE THE PC DOWN 
j {MOVE THE PSW DOWN 
i {RESTORE THE PSW 



.MACRO SETTRAP A.B.MSG 

tISET A,B,\<TRAP*$TRP>,\$TRP,<MSG> 
.NLIST 
ITRP-ITRPfl 
.LIST 

.ENDM SETTRAP 
.MACRO IISET A^B.C.D.COMNT 
.IF EQ ITRP-1 
.SBTTL TRAP TABLE 

;*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
{♦BY THE "TRAP" INSTRUCTION. 



! 



ROUTINE 



TRAP»D(C) 



COMNT 



ITRPAD; .WORD J TRAP2 

.ENOC 

.IIF NDF GNS, .NLIST 

A- C 
.IIF NDF GNS, .LIST 

B jjCALL-A 
.ENDM It SET 
.MACRO TRMTRP 
ITERM-.-ITRPAD 
.ENOM TRMTRP 
.SBTTL TRAP TABLE 

{♦THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
j*BY THE "TRAP" INSTRUCTION. 



1 


ROUTINE 




ITRPAD: 


. WORD 


ITRAP2 




mPE 


t {CALL »TvPE 




ITYPOC 


i »CALL-TYPOC 




1 TYPOS 


S tCAl L- TYPOS 




5TYP0N 


j {CALL-TYPON 



TRAP.H104401) 
TRAP>2( 104402) 
TRAP*3( 104403) 
TRAP*4C 104404) 



TTv TYPEOUT ROUTINE 

TYPE OCTAL NUMBER IUITK LEADING /ERG 
TYPE OCTAL NUMBER C NO LEADING /EROS) 
TYPE OCTAL NUMBER CAS PER LAST CALL) 



G6 



GLOBAL ARK AS 
KDJ11A.MAC 



3506 
3507 
3508 
3509 
3510 
3511 
3512 
3513 
3514 
3515 
3516 
3517 
3518 
3519 
3520 
3521 
3522 
3523 
3524 
3525 
3526 
3527 
3528 
3529 
3530 
3531 
3532 
3533 
3534 
3535 
3536 
3537 
3538 
3539 
354 
3541 
3542 
3543 
3544 
3545 
3546 
354 7 
3548 
3549 
3550 
3551 
3552 
3553 
3554 
3555 
3556 
3557 
3558 
3559 
35^0 
3561 



013034 
013036 

013040 
013042 
013044 



013046 
013054 
013062 
013064 
013072 
01.3072 
013074 
013076 
013102 
013104 
013112 
013114 
013122 
013124 
013130 
013136 
013142 
013144 
013150 
013*52 
013154 
013160 
013162 
013166 
013174 
013176 
013204 
013212 
013216 
013222 
013224 
013224 
013230 
013232 
013236 
013240 
013244 
013246 
013254 
013262 
013266 
013272 
0132 76 
013302 
013304 
013306 



MACU1 30AC1052) 
03-APR-84 11:36 

011536 
012260 



04-APR-84 10:38 PAGE 71 
TRAP TABLE 



SEQ 0071 



012210 
012472 
012612 



112767 
112767 
000403 
112767 

010046 
010146 
105767 
001450 
122767 
001031 
132767 
001425 
017600 
062766 
005767 
001375 
010067 
105720 
001376 
166700 
006200 
0)0067 
012767 
000413 
017667 
062766 
016746 
004767 
000000 

105767 
001416 
005767 
001413 
005767 
001375 
017667 
062766 
005267 
105067 
10506 7 
10506 7 
012601 
012600 
000207 



000001 
000001 



000206 

00000.1 

000100 

000004 
000002 
165636 

165644 

165634 

165630 
000004 

000004 
000002 
164560 
175740 

000062 

165562 

165534 

000004 
000002 

165512 
000020 
000013 
000006 



000236 
000226 



000001 000^20 



165706 
165677 

000004 



165604 

000016 
000004 



165526 
000004 



$TYPDS i tCALL-TYPDS 
$GTSWR | iCALL-GTSWR 



TRAP*5C 104405) TYPE DECIMAL NUMBER (WITH SIGN) 
TRAP*6C 104406) GET SOFT-SWR SETTING 



SB TIL 



SCKSWR i iCALL-CKSWR TRAP* 70 104407 ) 
JRDCHR mCALL-RDCHR TRAPf IOC 104410 ) 
SRDLIN j jCALL-RDLIN TRAP*11C 104411 ) 
APT COMMUNICATIONS ROUTINE 



TEST 

TTY 

TTY TYPEIN 



FOR CHANGE IN SOFT-SWR 
TYPEIN CHARACTER R0U1 INE 
STRING ROUTINE 



j ;**♦ 
*ATY1 

SATY3 

*ATY4 
$ATYC 



1$: 
2$: 



3$: 



4*; 
5$: 
10$ 



11$ 



12$ 



***** ************ *********** 

: MOVB #1,$FFLG 

: MOVB #1.$MFLG 

BR $ATYC 

: MOVB n.tFFLG 

MOV RO.-CSP) 

MOV Rl.CSP) 

TSTB IMFLG 

BEQ 5$ 

CMPB *APTENV,$ENV 

BNE 3$ 

BITB *APTSPOOL,$£NVM 

BEQ 3$ 

MOV &4CSP),R0 

ADD $2,4(5P) 

TST $MSGTYPE 

BNE 1$ 

MOV RO.JMSGAD 

TSTB (RO)* 

BNE 2$ 

SUB iMSGAD.RO 

ASR RO 

MOV RO.IMSGLGT 

MOV $4 # $MSGTYPE 

BR 55 

MOV a4(SP),4$ 

ADD 02.4CSP) 

MOV 177776, -CSP) 

JSR PC.JTYPE 

.WORD 

TSTB IFFLG 

BEQ 12$ 

TST *ENV 

BEQ 12$ 

TST IMSGTYPE 

BNE 11 $ 

MOV BW(SP),$FATAL 

MOD 02,4(SP) 

INC SMSGTrPE 

Cl.RB $fflg 

Ct.RB ILFl.G 

Ct.RO iMFl.G 

MOV (SP)*,R1 

MOV (SP)*.RO 

RTS PC 



*************.»****************** 
TO REPORT FATAL ERROR 
TO TYPE A MESSAGE 

TO ONLY REPORT FATAL ERROR 

PUSH RO ON STACK 

PUSH Rl ON STACK 

SHOULD TYPE A MESSAGE? 

IF NOT: BR 

OPERATING UNDER APT? 

IF NOT: BR 

SHOULD SPOOL MESSAGES? 

IF NOT: BR 

GET MESSAGE ADDR . 

j {BUMP RETURN ADDR. 
SEE IF DONE W/ LAST XMISSION? 
IF NOT: WAIT 
PUT ADDR IN MAILBOX 
FIND END OF MESSAGE 

SUB START Of* MESSAGE 
GET MESSAGE LNGTH IN WORDS 
PUT LENGTH IN MAILBOX 
TELL APT TO TAKE MSG. 

PUT MSG ADDR IN JSR LINKAGE 
5 jBUMP RETURN ADDRESS 
PUSH 177776 ON STACK 
CALL TYPE MACRO 



SHOULD REPORT FATAL ERROR? 

IF NOT: BR 

RUNNING UNDER APT? 

IF NOT: BR 

FINISHED LAST MESSAGE? 

IF NOT: WAIT 

GET ERROR 

j jBUMP RETURN ADDR, 
TELL APT TO tAKt ERROR 
CLEAR FATAL FLAG 
CLEAR LOG Fl AG 
CLEAR MESSAGE FLAG 



POP STACK 
POP STACK 
RETURN 



INTO 
INTO 



Rl 
RO 



H6 



GLOBAL 


ARIAS 


MAC Ml 


30A( 105 
11:36 


KDJ11A. 


MAC 03 -APR 84 


3562 


013310 


000 




3563 


013311 


000 




3564 


013312 


000 




3565 




013314 




3566 




000200 




3567 




000001 




3568 




000100 




3569 




000040 




3570 








3571 








3572 








3573 








3574 


013314 


00526 7 


165532 


3575 


013320 


001775 




3576 


013322 


005267 


165516 


3577 


013326 


021627 


001002 


3578 


013332 


101010 




3579 


013334 


012767 


007777 


3580 


013342 


012637 


001062 


3581 


013346 


012637 


001064 


3582 


013352 


000430 




3583 


013354 


017667 


000000 


3584 


013362 


011667 


000072 


3585 


013366 


062716 


000002 


3586 


013372 


017637 


000000 


3587 


013400 


104401 




3588 


013402 


000000 




3589 


013404 


062716 


000002 


3590 


013410 


104401 


001352 


3591 


013414 


016746 


000030 


3592 


013420 


104402 




3593 


013422 


104401 


00)366 


3594 


013426 


016746 


000026 


3595 


013432 


104402 




3596 


013434 


122767 


000001 


3597 


013442 


001004 




3598 


013444 


004767 


177414 


3599 


013450 


000000 




3600 


013452 


000777 




3601 


013454 


000000 




3602 


013456 


000002 




3603 


013460 


000000 




3604 


013462 






3605 


013462 


000010 




3606 




000001 





04 -APR -84 

APT 



10; 38 PAGE 72 



'ROUTINE 



SEQ 0072 



000106 



000066 



013402 



165356 



{ iMESSG. FLAG 
j {LOG FLAG 
j i FATAL FLAG 



JMFLG: .BYTE 
$LFLG: .BYTE 
$FFLG: .BYTE 

.EVEN 
APTSIZE-200 
APTENV-001 
APT5P0OL-1OO 
APTCSUP-040 
•;+*+**4^*************** *********************** ****************** 

{THIS ROUTINE WILL INCREMENT THE ERROR COUNT AND THEN PASS THE UNIQUE 
{ERROR NUMBER TO THE APT ERROR ROUTINE TO BE REPORTED TO THE APT SYSTEM. 

; INCREMENT ERROR FLAG 

iDON'T LET IT GO TO ZERO 

{INCREMENT THE ERROR COUNT 

j 1.5 ERROR FROM VECTOR AREA 

j IF YES 1H..M 

{REPORT AN UNEXPECTED TRAP 

{SAVE UNEXPECTED TRAP DATA 

;MNi> ;;; STORE SP 

iV.'M. 

I REPORT UNIQUE ERROR NUMBER TO APT 

{SAVE ERROR PC 

{GET OVER UNIQUE ERROR NUMBER FOR RETURN 

{TYPE ERROR MESSAGE 

jGET OVER ERROR MESSAGE 

{PUSH UNIQUt ERROR NUMBER ON THE STACK 
{ fYPE OCTAL ERROR NUMBER 

!PUSH ERROR PC ON THE STACK 

;TYPE THE ERROR PC 

{CHECK TO MAKE SURE WE'RE IN APT MODE 

{IF YES THEN 

{GO REPORT ERROR TO APT 

{STORAGE FOR ERROR NLfrieER 

{LOOP HERE AFTER REPORTING ERROR TO APT 

{IF NOT APT THEN HALT 

{ALLOW RECOVERY FROM HALT 



.END 



TERROR: 


INC 


IF.RFl G 




BEQ 


TERROR 




INC 


ERRCNT 




CMP 


CSP), #1002 




BHI 


1$ 




MOV 


07777, 3$ 




MOV 


C5P)*,3frSAV5Pl 




MOV 


(SP)+,a^SAVSP2 




BR 


2$ 


1$: 


MOV 


SCSP), 3$ 




MOV 


(SP).lOl* 




ADD 


02, (SP) 


100*: 


MOV 
TYPF 


3CSP), 80102$ 


102$: 


.WORD 







ADD 


02, (SP) 




TYPE 


,ERR1 




MOV 


3i,-CSP) 




TYPOC 






TYPE 


,ERR2 




MOV 


101$, -CSP) 




TYPOC 




2$: 


CMPB 


OAPTENV.SENV 




DNE 


5$ 




JSR 


PC, $ATY4 


3$: 


.WORD 





4$: 


BR 


4$ 


55: 


HALT 
RTI 




101$: 


.WORD 





JPATCH: 


j 






.BLKW 


10 



GLOBAL. ARfc-AS 
KDJ11A,MAC 



MACU1 30AC1052) 
03-APR-84 11;36 



04 -APR -84 10:38 PAGE 74 

CROSS REFERENCE TABLE 



16 

USER SYMBOLS 



SEQ 0073 



ABASE * 

ACDW1 • 

ACDW2 - 

ACPUOP- 

ADDLSB 

AODUO - 

ADDW1 * 

ADDW10" 

ADDW11* 

ADDW12* 

ADDW13- 

ADDW14* 

ADDU15* 

ADDW2 » 

A0DW3 - 

AD0W4 » 

ADDW5 * 

ADDU6 * 

ADDW7 « 

ADDW8 - 

ADDW9 * 

ADEVCT* 

ADEVM * 

AENV - 

AENVM - 

AFATAL* 

ALLCTR 

AMA0R1-- 

AMADR2* 

AMADR3= 

AMADR4* 

AMAMS1* 

AMAMS2-- 

AMANS3« 

AMAMS4= 

AMSGAD- 

AM5GLG- 

AMSGTY- 

AMTYP1» 

AMTYP2- 

AMTYP3* 

AMTYP4- 

APASS * 

A^RIOR-- 

APTCSU- 

APTENV* 

aptsft 



APTSI7* 
APTSPO 
ASWREG* 
AItSTN= 
AIJNIT * 
AU5WR = 
AVECU = 



000000 
000000 
000000 
000000 
001070 
000000 
000000 
000000 
000000 

oooooo 

000000 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 

001056 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 

000040 
000001 
0016.40 



000200 
000100 
002000 

oooooo 
oooooo 
oooooo 
oooooo 



625 

625 

625 

625 

6730 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

6-25 

66 7 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

625 

3084 
896 
8960 

1699 

2 746 
945 

3079 
5440 
625 
6c5 

*?.:> 

625 



640 
2537 + 



631 

636 

637 

628 

2701* 



633 
634 
627 



630 

35690 
307 7 
1282 
1791 
2755 
35660 
352 7 
625 
629 

6 32 
639 



2596 



2602 



2613* 2614 



2705* 2717* 2768+ 



3525 

1376 
1816 



3568 
638 



356 7 

1386 

1894 



3596 
1395 
2175 



140*. 
2194 



149^ 

2217 



1509 
2234 



1522 
2252 



1596 
2261 



1650 
2360 



16.'0 
2395 



lrv>* 
2405 



J 6 



GLOBAL , 


AREAS MACU1 


30A(1052) 


04 -APR 


-84 10: 


i38 PAGE 


75 
















SEQ 00 


KDJ11AJ 


flAC 03 -APR -84 


11:36 




CROSS REFERENCE 


TABLE -- 


- USER SYMBOLS 












.-j i--, \m *' V 


AVECT2- 


000000 


625 


























BACDAT 


003052 


1269 


12940 
























BHVKNT* 


177546 


5360 


























BGNTL.P 


006740 


25530 


2607 
























BITO •■■• 


000001 


357 


























GITOO - 


000001 


3470 


357 


1467 


1501 


1514 


1527 


1573 


1889 


1964 


2068 


2339 


2530 


2696 


bitoi * 


OC0002 


3460 


356 


2342 


2350 


2380 


2823 


2904 














BITO? ■ 


000004 


3450 


355 


1122 


1190 


1666 


1695 


2164 


2206 


2338 


2737 


2862 


2938 




BIT03 * 


000010 


3440 


354 


1134 


1196 


1203 


1373 


1383 


1402 


1492 


1506 


1518 


1581 


164 7 






1663 


1676 


1692 


1788 


1813 


1891 


2258 


2357 


2392 


2740 


2854 


2925 


2956 


BIT04 - 


000020 


3430 


353 


2191 


2231 


2249 


















BIT05 = 


000040 


3420 


352 


2172 


2214 




















BIT06 * 


000100 


3410 


351 


1786 


1809 


1811 


1966 
















BIT07 - 


000200 


34G0 


350 


1368 






















BIT08 * 


000400 


3390 


349 


905 


1828 


1905 


1963 


2690 


2794 












BIT09 - 


001000 


3380 


346 


1645 


2523 


2791 


















BITl - 


000002 


3560 


























BIT10 - 


002000 


3370 


























BIT11 ■ 


004000 


3360 


























BIT12 - 


010000 


3350 


























BIT13 » 


020000 


3340 


























BIT14 - 


040000 


3330 


























BIY15 * 


100000 


3320 


1486 


14 90 


1500 


1503 


2803 


2818 














BITS - 


000004 


3550 


























BIT3 - 


000010 


3540 


























BIT4 * 


000020 


3530 


























BITS ■■« 


000040 


3520 


























BIT6 - 


000100 


3510 


























BIT7 - 


000200 


3500 


























BIT8 * 


000400 


3490 


























BIT9 = 


001000 


3460 


























BOARD T- 


000001 


10 


587 


693 


730 




















BPTVF.C- 


000014 


3640 


























BYPARR 


003374 


1367 


14250 
























CACHET* 


a***** \j 


J. 
3040 


219 
3305 


244 


587 


672 


696 


/09 


/15 


7 30 


751 


952 


954 


969 


CCR 


177746 


5300 


905* 


910* 


966* 


1002* 


1052* 


1053* 


1054 


1056 


1070 


1072* 


1122* 


1125* 






1134* 


1142* 


1190* 


1193* 


1368* 


1418* 


1579* 


1645* 


1704* 


1783* 


1/86* 


1809* 


1811* 






1828* 


1887* 


1889* 


1905* 


1966* 


1968* 


1983* 


20/2* 


20/4* 


2089* 


2164* 


2167* 


2206* 






2209* 


2342* 


2350* 


2380* 


2414* 


2531* 


2618* 


2699* 


2823* 


2904* 


2994* 






CKSWR * 


104407 


35100 


























COUNT 


001040 


6590 


























CPFRFG* 


177766 


5330 
2094* 


904 * 
2268* 


1007* 
2418* 


1145* 
2621* 


1211* 
27/7* 


1289* 


1420* 


1529* 


1603* 


1706* 


1832* 


1908* 


1985* 


CPUT5T= 


000001 


10 


244 


587 


690 


730 


968 


3040 














CR 


000015 


2720 


709 


/15 


726 


7 30 


732 


735 


304Q 


3049 


3140 


3152 






CRL.r 


000200 


2730 


3094 


3152 






















CTSTIO 


003676 


15350 


























CTST11 


004052 


16090 


























CT5T12 


004 3/4 


WHO 


























CT5T13 


004/16 


18460 


























CTST15 


005072 


19210 


























C T s r 1 7 


005316 


20130 


























CT5T2 


002312 


10220 


























CT5T20 


005526 


21010 


























CTST21 


006146 


22/50 



























I<6 



GLOBAL 


AREAS hACUl 


30'\( 1052) 


04 -APR 


:-84 10; 


: 38 PAGE 


76 
















SEQ 00 


KDJ11A. 


MAC 03 -APR -84 


11:36 




CROSS REFERENCE 


TABLE -- 


• USER SYMBOLS 












CTST22 


00654? 


24230 


























CTST23 


007274 


26260 


























CTST24 


007720 


2785V) 


























CTST3 


002414 


10780 


























CTST4 


002556 


11560 


























CTST5 


002710 


12230 


























CTST6 


003106 


13120 


























CTST7 


003402 


14320 


























CURADD 


001104 


6790 


2950* 


2951* 


2952* 


2954 


















CURDAT 


001076 


6760 


























DAP ABO 


004 706 


1774 


18370 
























DATRAM* 


****** \j 


715 


953 


2423 






















DCOUNT 


001054 


6660 


2552* 


2553 


2562 


2578 


2586 


2591* 


2718* 


2762* 










DO ISP = 


177570 


2790 


663 


926 






















DISPLA 


001050 


6630 


926* 


934* 






















DISPRF. 


000174 


5730 


934 
























DSWR * 


177570 


2780 


662 


925 






















EMTVEC= 


000030 


3670 


914* 


915* 






















ENDHRT 


003032 


1267 


12870 
























ENDLUP 


007222 


26140 


























ENDTLP 


007172 


2554 


26080 
























ERRCNT 


001044 


6610 


3576* 
























F.RRMSG 


00132b G 


7260 


869 


1015 


1062 


1068 


1132 


1140 


1153 


1200 


1207 


1219 


1285 


1379 






1389 


1398 


1409 


1416 


1428 


1496 


1512 


1525 


1599 


1653 


1673 


1682 


1702 






1780 


1794 


1800 


180 7 


1819 


1826 


1840 


189 7 


1903 


1916 


1979 


1994 


2002 






2008 


2080 


2086 


2178 


2185 


2197 


2203 


2220 


2226 


2237 


2243 


2255 


2264 






2365 


2371 


2400 


2408 


2560 


2572 


2751 


2760 


2849 


2858 


2873 


2886 


2921 






2929 


2943 


2965 






















FRRNUM* 


000104 


5430 


866 


8700 


1013 


10160 


1060 


10630 


1066 


10690 


1130 


11330 


1138 


11U* 






1151 


11540 


1198 


12010 


1205 


12080 


1217 


1220O 


1283 


1286* 


1377 


13800 


1337 






13900 


1396 


13990 


1407 


14100 


1414 


14170 


1426 


14290 


1496 


14990 


1510 


15130 






1523 


15260 


1597 


16000 


1651 


16540 


1671 


16740 


1680 


16830 


1700 


17030 


1778 






17810 


1792 


17950 


1798 


18010 


1805 


10080 


1817 


18200 


1824 


18270 


1838 


18410 






1895 


18980 


1901 


1904 


1914 


19170 


1977 


19800 


1992 


19950 


2000 


2003 


2006 






20090 


2078 


20810 


2084 


20870 


2176 


21790 


2183 


21860 


2195 


21980 


2201 


2204* 






2218 


22210 


2224 


22270 


2235 


22380 


2241 


2244 


2253 


22560 


2262 


226S* 


2363 






23660 


2369 


23720 


2398 


24010 


2406 


24090 


2558 


25610 


2570 


25730 


2749 


2752* 






2758 


27610 


2847 


28500 


2856 


28590 


2871 


28740 


2H84 


2887* 


2919 


29220 


2927 






29300 


2941 


29440 


2963 


29660 


















ERR OUT 


002302 


1001 


10120 
























ERRTN = 


000000 


5410 


























ERRVEC- 


000004 


3600 


923 


924* 


935* 




















ERR1 


001352 


7300 


3590 
























ERR2 


001366 


7320 


3593 
























EXPDAT 


001034 


6570 


























EXPTBL 


003070 


1265 


13010 
























EXTST 


007236 


2525 


2615 


26W0 






















FLAG 


001042 


6600 


2796* 


2 798* 


2840 


2901 


2912 
















FLDO 


010134 


28580 


2889 


2896 






















H DOA 


0101/4 


2846 


28520 
























FL.D1 


010534 


2892 


28980 
























FLD1A 


010414 


29110 


29 79 
























rl DIB 


010454 


2918 


29230 
























FMPARR 


002550 


1119 


11500 
























FPPTSN 


000001 


10 


244 


58 7 


688 


696 


69 7 


730 


751 


968 


'5040 








FPVEC * 


000244 


5270 



























M6 



GLOBAL, i 


4Rt AS riAC'i 


11 30AC1052) 


04 -APR 


-84 10:38 PAGE 78 








SEQ 00 


KDJUA.I 


iAC 05 -APR 


-84 11:36 




CROSS REFERENCE TABLE -• 


- USER SYMBOLS 






LSTADD 


001102 


678* 


254 7* 


2550* 2574 










MMUTST- 


000001 


1* 


244 


587 687 709 


730 751 


952 954 968 


3040 


3305 


MMVEC - 


000250 


376* 














MSER = 


177744 


531* 


902* 


1003* 10D6* 1144* 


1210* 1288* 


1419* 1528* 1602* 


1705* 


17 75* 17 76 






1796 


1802* 


1803 1822 1831* 


1886* 1907* 


1969* 1984* 2004 


2093* 


2267+ 2417+ 






2620* 


2776* 












HSGl 


011054 


3014 


3040* 












HSG2 


011135 


3024 


3049* 












MXVDFL- 


000001 


1* 


1921 


2013 










NEWADD 


001114 


683* 














NfcWDAT 


001074 


675* 














OPKSGc? 


001162 


709* 


952 












OPMSG3 


001224 


715* 


953 












PARRAM- 


000001 


1* 


2013 












PIRQ - 


177772 


277* 














PIRQVE= 


000240 


371* 














PRO 


000000 


294* 














PR1 


000040 


295* 














PR? 


000100 


296* 














PR3 


000140 


297* 














PR4 


000200 


298* 














PR5 


000240 


299* 














PR6 


000300 


300* 














PR7 


000340 


301* 














PS 


177 7 76 


274* 


275 












PSW 


1777 76 


275* 














PWRVEC* 


000024 


366* 














QBUSEX= 


000001 


1* 


t.ilS 


3001 










RAMPAR 


001630 


866* 


999 


1262 1483 2349 


2539 2715 








RBUf- - 


177562 


538* 














RCSR = 


177560 


53/* 














RDCHR = 


104410 


3418 


3511* 












RDLIN - 


104411 


3512* 














RLCDAT 


001036 


658* 


2366* 


2367 2401+ 2402 










RE 5 TAR 


002176 


965* 


3037 












RFSVEC= 


000010 


361* 














RITEDA 


001072 


674* 














SAVSP1 


001062 


669* 


IS580* 












5AVSP2 


001064 


6/0* 


3581* 












SDPARO* 


1 72260 


464* 














SDPAR1-- 


172262 


465* 














SDPAR2* 


172264 


466* 














5DPAR?* 


1.2266 


467* 














SDPAR4 - 


1722 70 


468* 














5DPAR5* 


172272 


469* 














IJDPAR6* 


1722/4 


4 70/: 














SDPAR7* 


1/22/6 


4 71* 














SDPORO* 


172220 


442* 














SDPDR1* 


172222 


44^* 














SDPDR2- 


172224 


444* 














5DPOR3* 


172226 


445* 














SDPDR4 - 


172230 


446* 














SDPDR5- 


172232 


44 /* 














5DPDR6* 


172234 


448* 














SOPOR/? 


1722 3*. 


449,'.' 














5HMOO = 


000001 


1* 


614 


304 











GLOBAL 


ARFAS MAC ^ 11 


30AC1052) 


KDJ11A. 


MAC 03 -APR -84 


11:36 


5IPARO 


172240 


4530 


SIPARl- 


172242 


454 


SIPAR2- 


172244 


4550 


SIPAR3- 


172246 


4560 


SIPAR4* 


172250 


45/0 


5IPAR5= 


172252 


**580 


SIPAR6- 


172254 


459# 


SIPAR7- 


172256 


^600 


SIPDRO= 


172200 


4310 


SIPDR1= 


172202 


4320 


SIPDRP- 


172204 


4330 


SIPDR3* 


172206 


4340 


SIPDR4- 


172210 


435£ 


SIPDR5- 


1?2212 


4360 


SXPDR6= 


172214 


4370 


5IPDR7- 


1/2216 


43tt0 


SKIP ID 


010/60 


3013 


SL.OCOO 


001030 


6530 
2617 


Sl.OCOl 


001052 


6540 


SOFTER 


001116 


6840 
1986* 


SOFTRE 


001120 


6850 



SRO 



= 177572 



SRI 


17 75/4 


5R2 


177576 


SR3 


1/2516 


STACK « 


001000 


START 


001/16 


STBGT = 


001000 


STKl MT = 


1//774 


syw 


001046 


SURKG 


000176 


5 WO 


000001 


5 WOO - 


000001 


5U01 = 


000002 


SW02 * 


000004 


SU03 * 


000010 


SW04 * 


000020 


5W05 == 


000040 


5W06 « 


000100 


SWU7 


000200 


5W08 - 


000400 


SU09 - 


001000 


SW1 


000002 


swio - 


002000 


5W11 


004000 


5W!2 • 


010000 


SW13 


020000 


51414 


04 0000 


SW15 


100000 


SU2 


000004 


SW3 


000010 



1678* 
2404* 
3800 
1982* 
3810 
3820 
3830 
2650 
570 
5480 
2 760 
6620 
5740 
3290 
3190 
3180 
3170 
3160 
3150 
3140 
3130 
3120 
3110 
3100 
3280 
3040 
3080 
30/0 
3060 
3050 
304 
32/0 
3260 



04 -APR -84 10:36 PAC5E 79 

CROSS RKF&RENCE TABLE 



N6 

USER SYMBOLS 



SEQ 0076 



30150 

998* 
2714* 
2998 

898 
2095* 

906 
1698* 
2745 + 

903 + 
2068* 



206 7* 
912 
5 76 

2996 

925* 

933 

329 

328 
32/ 
326 
325 
324 
323 
322 
321 
320 



1773* 
2775 

901* 

2269* 
1281* 
1/90* 
2/54 + 
1487* 
2083* 



2338* 
9090 



9;>7 
959 



1829 
2799* 

1008* 
2419* 
1375* 
1615* 

1489* 
2092* 



1.884* 
2997 

1146* 
^622 + 
1385* 
1893* 

1501* 
2339* 



1906 



12 12* 
27 78* 
1394* 
2174* 

1504* 
2415* 



1970* 1981 



2064* 2091 



2346* 2416 



1290* 

1405* 
2193* 

1514* 
2530* 



1421 + 

1494* 
2216* 

1520* 
2619* 



1530* 

1508* 
2233* 

l c >2/ + 
2696* 



1604 + 

15.' 1 + 
2251* 

15/3* 
2774* 



1707 + 

1595* 

2260* 

1590* 
2809* 



1833* 

1649 + 
2359* 

1601* 
2995 + 



2538* 



1909 + 

1669» 

2394 + 

1964 + 



2695+ 2804+ 



r W + 
3315 



44 /* 
3328 



959 



252 * 



2690 



2?91 



2794 



3315 



3352* 



U.PHAl 


ARf AS MrtCl 


n JOAvios.n 


KDJ11A 


MAC 03 


APR 


•84 11:56 


5W4 


■ 0000/0 




3/50 


5U5 


■ 00004 




3/4 


sue. 


• 000100 




3/3* 


SW .* 


• 000/00 




3//* 


sua 


' 000400 




3/10 


r>u9 


' 001000 




3/00 


tauadi 


oi of.;/ 




/a/4 


TAfiAD.' 


010 704 




2908 


TAUMAM 


« »***«« u 




71 r ^ 


TAPAHO 


<»0506/ 




iaa f . 


Tnuv* 


- ooco:*i 




36/0 


Tm.» i" 


0<-J:>>; % 




3690 


IPVf r 


ro*.n>*»t 




3/00 


TI.A^vi 


' \>tM)\.'.'.4 




3680 


fRHiC 


* 000014 




3630 


TM.NO 


010/ U't 




2980 


T J" T ADD 


00111/ 




68/0 


TSTLOC 


00112c 




6950 



ViTlL** 


006656 


TV. l 


00// 10 


*sT10 


0036/6 


! S T 1 1 


004 O r i/ 


TST1/ 


004 3/4 


TST13 


004 716 


TST14 


00507/ 


TST15 


005316 


TSTlt, 


0055/6 


7 S T i ; 


006 146 


TST.J 


00/31/ 


TST/O 


00654/ 


1ST/1 


00 7/ 74 


TST// 


00 7 71V 


T5T3 


00/414 


T.,T4 


00/556 


TSTS 


00// 10 


TST6 


00510b 


TST 7 


00340/ 


TtPDS « 


104405 


t t pe • 


' 104401 


7*P0C 


■ 10440/ 


TtPON • 


104404 


TYPOS • 


• 104403 


IJOPARO 


■ 17 7660 


U0PAR1 


• 1 / 766/ 


UOPAR/' 


■ 1//664 


IJ0PAR3 


' 17/666 


U0PAR4 


' 17 76/0 


UDPAH5 


17 76 7/ 


UDPAR6 


• 17/6/4 


UOPAW ■' 


1 / /*, /*, 


UUPUR0= 


» 177620 



1369 
1505 

ieio* 

2229 

Z5410 
9960 
1531 
1605 
1708 
1834 
1910 
1987 
Z096 
ZZ70 
1009 
24/0 
26/3 
27/9 
11170 
1147 
1013 
1/91 
142/ 
3026 
95/ 
33/3 
33/9 
35050 
5504 
4/00 
4/10 
4/20 
4230 
4/4 
4/50 
4/60 
4//0 
3980 
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80 
ABL 



2895 

9M 

19130 



916* 

2994 

1120* 

1371* 

1515 

181/ 

2246 

2611 

15670 
16410 
17710 
18780 
19570 
20610 
21610 
23340 
10490 
25210 
26P80 
2 7890 

11850 
1/600 
13650 
14810 
35060 

953 
3422 
35030 



29830 
/98H0 
27/6 



917* 



1123* 

137/ 

1643 

188B* 

2248* 

2616 

1595 
1649 
1790 
1893 



21 74 
235S 



2745 



1281 
1375 
1494 

3014 
34/5 
3U92 



278 V 



1127 
1301* 

1644 
1890 
225 7 



1669 
1815 



2193 
2394 



2754 



1385 
1508 

30/4 
34/9 
3595 



2783 



1135 
1382* 
1646 
1962* 



1678 



2/16 

2404 



1394 
1521 

30/7 
350/0 



USER SYMBOL!, 



GEO 00 79 



1143* 
139/ 

1655* 
1967* 



1698 



2233 



1188* 
1400* 

1658 
1973 



1191* 
1401* 

16 75 
2163* 



1195 
141/ 
1684* 
2165* 



1/0/ 
1485* 
168/ 
2170 



12 70 
1488* 
178/* 
2188 



1/73 

1491 

1/85* 

2207* 



1/75 
150/ 

1 /a/ 

2212 



2251 



2260 



140' 



309 7 
3587 



3/19 
3590 



3/A8 
3593 



332b 



332 



3330 



3343 



3354 



GLOBAL 


ARt AS 1 


KDJ11A, 


MAC 03 


STRAP 


012766 


5TRAP2 


013010 


$TRP - 


00001? 


5TRPAD 


013022 


*T$TM 


000210 


$TSTNU= 


000001 


STTYIN 


012720 


mPBN* 


****** \j 


$T>POS 


011536 


STYPE 


011162 


JT1PF.C 


011374 


$T1PEX 


011514 


$TYPOC 


012006 


STY PON 


012022 


* TYPOS 


011762 


SUNIT 


001012 


SUNITM 


000214 


JUSWR 


001024 


$XOFT « 


000023 


$XON - 


000021 


$*CET4» 


000000 


5 OF ILL 


012205 


$40CAT 


000000 


* * 


013502 


.JASTA' 


****** \j 


,$X 


000204 
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E 7 

USER SYMBOLS 



SEQ 0082 



916 
3465* 
34 940 
3459 
605* 
5420 
3415 
3507 
31730 
30710 
3101 
3143 
32580 
3257 
32530 
6320 
6070 
6390 
3125 
3132 
30300 
3254* 
5670 
5520 
6140 
3156 
36050 
3517 
5920 



34540 

3501 

35030 

35010 



3416 

3506 

3494 

3108 

3145 

3503 

32600 

3504 



3152 
3152 



568 
6150 
3157 

3520 
59 7 



35040 35050 35060 35070 3508 



3433 



3502 

3115 
31480 

3505 



3258* 3268 



6960 



T.i 



58 



35090 3510 



35110 35120 35130 



34370 



3544 

31200 3359 



609 



33030 

581 

7370 
3159 



614 



5820 

3038 
31600 



5840 
30390 
32270 



5860 
30530 
3308 



592 
3150 
34 370 



5930 
3151 
3438 



5950 
3152 
3444 



5970 
3153 
3445 



6090 
3154 
3446 



6100 
3155 
35650 



F7 



GLOBAL AREAS 
KDJ11A.MAC 
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CROSS REFERENCE TABLE 



-- MACRO NAMES 



A 

BGNMOD 
BGNSU6 
BGNTST 

CCHMS2 

CCHMS3 

CCHMS4 

CCHMS5 

CCHMSO 

CKLOOP 

CMSG1 

CMSGIO 

CMSG11 

CMSG12 

CMSG13 

CMSG15 

CMSG17 

CMSG20 

CMSG21 

CMSG22 

CMSG23 

CMSG7 

COMMEN 

DEFPRG 

ENIOCOM 

ENOMOD 

ENDPAS 

ENOSU6 

ENDTCT 

ERRDEF 
ERRDF 



F.RRFOl 

ERRFQ2 
ERRF03 
ERRF04 
ERRF05 

efwo6 

ERRF07 

ERRF08 

ERRF09 

ERRF1 

ERRFIO 

ERRF11 

ERRF12 

ERRF13 

ERRF14 

ERRF15 

ERRF16 

ERRFlV 



1281* 

1093* 

238* 

239* 

238* 

2334 

1021* 

1078* 

1156* 

1223* 

1311* 

238* 

969* 

1535* 

1609* 

1711* 

1846* 

1921* 

2013* 

2101* 

2275* 

2423* 

2626* 

1432* 

372* 

1* 

372* 

238* 

3002* 

239* 

238* 

2422 

237* 

238* 

1407 

1817 

2201 

284 7 

235* 

235* 

235* 

235* 

236* 

236* 

236* 

236* 

236* 

227* 

226* 

228* 

2280 

228* 

228* 

2280 

229* 

229* 



1375* 

2.174* 

967 

996 
2521 
1025 
1081 
1159 
1226 
1315 

971 
1538 
1612 
1714 
1849 
1924 
2016 
21C4 
2278 
2426 
2629 
1435 



3000 
3024 

1019 
2625 

866 
1414 
1824 
2218 
2856 



2174 
2193 
2216 
2233 

2359 
2394 
1012 
1385 

1394 
1405 
1414 
1494 
1508 
1521 
1595 



13850 
2193* 



1049 
2688 



1394* 
2216* 



1117 
2769 



1405* 
2233* 



1185 



1494* 

2251* 



1260 



1508* 
2260* 



1365 



1521* 
2359* 



1481 



1595* 
2394* 



1567 



1649* 1669* 16 78* 
2404* 2745* 27540 



SEQ 0083 



1698* 1790* 1815* 



1641 1771 1878 1957 2061 



2161 



1076 
2781 

1013 

1426 
1838 
2224 
2871 



1155 
2999 

1060 
1496 
1895 
2235 
2884 



1221 



1066 
1510 
1901 
2241 
2919 



1309 



1130 
1523 
1914 
2253 
2927 



1430 



1138 
1597 
1977 
2262 
2941 



1533 



1151 

1651 
1992 
2363 
2963 



1607 



1198 
1671 
2000 
2369 



1710 



1205 
1680 
2006 
2398 



1844 



1217 

1700 
2078 
2406 



1920 



1283 
1778 
2084 
2558 



2012 



1377 
1792 
2176 
2570 



">7> 



72 



138/ 
1798 
2183 
2749 



1396 
1805 
2195 
2758 
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G7 

- MACRO NAMES 



SEQ 0084 



ERRF18 

F.RRF19 

ERRF2 

ERRF20 

ERRF21 

ERRF22 

ERRF23 

ERRF24 

ERRF25 

ERRF26 

ERRF27 

ERRF28 

ERRF29 

ERRF3 

ERRF30 

ERRF31 

ERRF32 

ERRF33 

ERRF34 

ERRF35 

ERRF36 

ERRF37 

ERRF38 

ERRF39 

ERRF4 

ERRF40 

ERRF41 

ERRF42 

ERRF43 

ERRF44 

ERRF45 

ERRF46 

ERRF4 7 

ERRF48 

ERRF49 

ERRF5 

ERRF50 

ERRF51 

FRRF52 

ERR^53 

ERRFS4 

ERRF55 

F.RRF56 

ERHF57 

ERRF58 

ERRF59 

ERRF6 

ERRF60 

ERRF61 

ERRF62 

ERRF63 

ERRF64 

KRRF65 

ERRF66 

ERRF6 7 

ERRF7 



229* 
229* 
227* 
229* 
229* 
229* 
229* 
230* 
230* 
230* 
230* 
230* 
230* 
227* 
230* 
230* 
231* 
231* 
231* 
231* 
231* 
231* 
231* 
231* 
227* 
232* 
232* 
232* 
232* 
232* 
232* 
232* 
232* 
233* 
233* 
227* 
233* 
233* 
233* 
233* 
233* 
233* 
234f 
234* 
234* 
234* 
227* 
234* 
234* 
234* 
234* 
235* 
255* 
235* 
235* 
22 7* 



1649 
1668 
1060 
1678 
1697 
1778 
1790 
1798 
1805 
1815 
1824 

1837 

1065 
1893 
1900 
1913 



1977 
1992 
2000 
1130 
2006 



2078 
2084 
2182 
2200 
1138 
2223 
2240 
2251 
2260 
2369 
2404 
2558 
2570 
2745 
2754 
1198 
284 7 
2856 
2871 
2834 
2919 
2927 
2941 
2963 
1205 



GLOBAL AREAS 
KDJ11A.MAC 
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CROSS REFERENCE TABLE 



H7 

MACRO NAMES 



ERRFO 
ERRF9 

ERROR 



ESCAPE 

ETXT1 

ETXT10 

ETXT11 

ETXT12 

ETXT13 

ETXT14 

ETXT15 

ETXT16 

ETXT17 

ETXT18 

ETXT19 

ETXT2 

ETXT20 

ETXT21 

ETXT22 

ETXT23 

ETXT24 

ETXT25 

ETXT26 

ETXT27 

ETXT28 

ETXT29 

ETXT3 

ETXT30 

ETXT31 

ETXT32 

ETXT33 

F.TXT34 

FTXT35 

ETXT36 

FTXT37 

ETXT38 

ETXT39 

ETXT4 

F.TXT40 

ETXT41 

ETXT42 

ETXT43 

FTXT44 

ETXT45 

ETXT46 

ETXT47 

FIX 148 

FTXT49 

ETXT5 

FTXT50 

F1XT51 

ETXT52 



228* 

266* 
1407 
1817 
2201 
284 7 
372$ 
2195 
220* 
2204 
220* 
220* 
220* 
220* 
220* 
220* 
221* 
221* 
219* 
221* 
221* 
221* 
221* 
221* 
221* 
222* 
222* 
222* 
222* 
219* 
222* 
222* 
222* 
222* 
223* 
223* 
223* 
223* 
223* 
223* 
219* 
223* 
223* 
224* 
224* 
224* 
224* 
224* 
224* 
224* 
224* 
219* 
225* 
225* 
225* 



1280 
1375 
867 
1414 
1824 
2218 
2836 

992 

1342 
1346 
1351 
1355 
1461 
1469 
1475 
1562 
1623 
1627 
1039 
1632 
1636 
1729 
1738 
1741 
1746 
1753 
1756 
1761 
1766 
1042 
1866 
1868 
1874 



1937 

1943 
1948 
1103 
1951 



204 7 
2057 
2135 
2139 
1110 
2144 
2148 
2153 



1013 
1426 
1838 
2224 
2871 



1060 
1496 
1895 
2235 
2884 



1066 
1510 
1901 
2241 
2919 



1130 

1523 

1914 

2253 
2927 



1138 
1597 
1977 
2262 
2941 



1151 
1651 
1992 
2363 
2963 



1198 
1671 
2000 
2369 



1205 
1680 
2006 
2398 



1217 
1700 
2078 
2406 



1283 
1778 
2084 
2558 



1377 
1792 
2176 
2570 



1387 
1798 
2183 
2749 



SEQ 0085 



1396 
1805 
2195 
2758 
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1 7 

MACRO NAMES 



SEQ 0Q86 



ETXT53 


225* 


2157 




























ETXT54 


225* 


2308 




























ETXT55 


225* 


2325 




























ETXT56 


225* 


2461 




























ETXT57 


225* 


24 70 




























ETXT58 


226* 


2668 




























ETXT59 


226* 


2672 




























ETXT6 


219* 


1176 




























ETXT60 


226* 






























ETXT61 


226* 






























ETXT62 


226* 






























ETXT7 


219* 


1180 




























ETXT8 


219* 


1244 




























ETXT9 


219* 


1337 




























EXITST 


236* 
2620 


1006 
2776 


1144 


1209 


1287 


1419 


1528 


1602 


1705 


1830 


1907 


1984 


2093 


2266 


2417 


FRONT 


1* 






























FR0NT1 


1* 


216* 




























GETPRI 


372* 






























GETSWR 


372* 


954 




























TDMSG 


3002* 


3012 




























MU.T 


372* 






























NEWTST 


237* 
2101 


372* 

2275 


969 
2423 


1022 

2626 


1078 

2785 


1156 


1223 


1312 


1432 


1535 


1609 


17U 


1846 


1921 


2013 


POP 


372* 


3214 


3559 


3560 
























PUSH 


372* 


3173 


3520 


3522 


3543 






















REPOPT 


372* 






























SCOPE 


26 7* 






























SETPRI 


372* 






























5ETTRA 


3469* 


5494 


3503 


3504 


3505 


3506 


3508 


3510 


3511 


351? 












SETUP 


23 7* 


372* 


911 


























SFTERR 


236* 


1281 


1375 


1385 


1394 


1405 


1494 


1508 


1521 


1595 


1649 


1669 


1678 


1698 


1790 




1815 


1893 


2174 


2193 


2216 


2233 


2251 


2260 


2359 


2394 


2404 


2745 


2754 






SKIP 


372* 






























SLASH 


3/2* 






























SPACE 


572* 






























STARS 


372* 


579 


539 


591 


598 


624 


969 


971 


995 


1023 


1025 


L048 


1079 


1081 


1116 




1157 


1159 


1184 


1224 


1226 


1259 


1313 


1315 


1364 


1433 


1435 


1480 


1536 


1538 


1566 




1610 


1612 


1640 


1712 


1714 


1770 


184/ 


184^ 


1877 


1922 


1924 


1956 


2014 


2016 


2060 




2102 


2104 


2160 


2276 


2278 


2333 


2424 


2426 


2520 


262 7 


2629 


268 7 


2786 


2788 


3005 




3056 


3163 


3230 


3307 


3310 


3378 


3407 


3448 


3515 


3570 












SWRSt.i 


372* 


921* 




























TAIL. 


1* 


3002 




























TRMTRP 


3491* 






























TYPBIN 


372* 






























TYPDEC 


372* 


3025 




























TYPNAM 


3/2* 






























TrPN<JM 


372* 






























TYPOCS 


372* 






























Ti'POCT 


372* 


3328 




























TrPTXT 


372* 






























$$ESCA 


372* 






























JJFTER 


1281* 


1375* 


1385* 


1394* 


1405* 


1494* 


1508* 


1521* 


1595* 


164^0 


166^* 


lb/8* 


1698* 


1 'wo* 


li»!.5* 




1893* 


2174* 


2193* 


2216* 


22 53* 


2251* 


2260* 


235**0 


2 394* 


24 04* 


2/45* 


2/54* 








5SNEWT 


3 72* 
2276 


969 
2424 


1023 
2627 


1079 
2/86 


1157 


1224 


1313 


1435 


1536 


1610 


1712 


184 7 


1922 


J014 


2102 



M 



GLOBAL 


AREAS 


MACU1 


30A( 1052) 


KOJUA, 


MAC 03 


•APR -84 


11:36 


*SSET 


34 75* 


3494 


3503 


$*SETM 


°37* 


944 




$$SKIP 


372* 






.EQUAT 


237* 


262 




.HEADE 


239* 


244 




.Kill 


237* 


3 72 




.SETUP 


239* 


549 




. $ACT1 


239* 


577 




. JAPTB 


237* 


622 




. $APTH 


239* 


587 




. $APT\ 


240* 


3513 




.$EOP 


237* 


3003 




. sehro 


240* 






. $RLAD 


240* 


3305 




.5 TRAP 


239* 


3446 




. $HPD 


238* 


3161 




.$TYPE 


238* 


3054 




♦ $TlPO 


240* 


3228 




. $40CA 


237* 


550 
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3504 



3505 



3506 



3506 



- MACRO NAMES 
3511 



SEQ 0087 



3510 



3512 



. ABS. 013502 



000 



ERRORS DETECTED: 

CZKDMB/EN:AB5 t C7KDMB.SEQ/D0C/S0L/CRF/NLjT0C-SYSMPC.SML/ML,CZKDMB.MAC/ML t KDJllA.MAC 
RUN-TIME: 748 109 5 SECONDS 
RUN-TIME RATIO: 1206/864*1.4 

CORE USED: 58K (115 PAGES) 



DOCUMENT PAGES: 87 
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. .CI 


KDJllA.MAC 


03- APR.. 
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KDJllA.MAC 
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..Dl 


KDJllA.MAC 
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KDJllA.MAC 
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. .El 


KDJllA.MAC 
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KDJllA.MAC 
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..Ft 


KDJllA.MAC 


03-APR., 


.,F5 


KDJ11A,MAC 


03-APR. . 


..Gl 


KDJllA.MAC 


03-APR,. 


,.G5 


KDJllA.MAC 


03-APR.. 


..HI 


KDJllA.MAC 


03-APR.. 


..H5 


KDJllA.MAC 


03-APR.. 


,.11 


KDJllA.MAC 


03-APR.. 


..15 


KDJllA.MAC 


03-APR.. 


..Jl 


KDJllAJiAC 


03-APR.. 


,.J5 


KDJllA.MAC 


03- ATP., 


..Kl 


KDJllA.MAC 


03-APR.. 


..K5 


KDJllA.MAC 


03-APR,. 


..LI 


KDJllA.MAC 


03-APR.. 


..L5 


KDJ11A.HAC 


03-APR. . 


..HI 


KDJllA.MAC 


03-APR.. 


..M5 


KDJllA.MAC 


o;: apr.. 


. .Nl 


KDJllA.MAC 


03-APR.. 


,.N5 


KDJllA.MAC 


03-APR.. 


. .82 


KDJllA.MAC 


03-APR., 


,,B6 


KDJllA.MAC 


03-APR.. 


..C2 


KDJllA.MAC 


03-APR.. 


..C6 


KDJllA.MAC 


03-APR. . 


..02 


KDJllA.MAC 


03-APR., 


.,C* 


KDJllA.MAC 


03-APR.. 


. ,E2 


KDJllA.MAC 


03-APR.. 


..ej 


K0J11A.HAC 


03-APR., 


.,F2 


KDJllA.MAC 


03-APR.. 


. .F6 


KOJ11A.MAC 


03-APR., 


,.G2 


KDJllA.MAC 


03-Afa.. 


,.G6 


KDJllA.MAC 


03-APR,, 


,.H2 


KDJllA.MAC 


03-APR.. 


..Mfc 


KDJllA.MAC 


03-APfU. 


..12 


KDJllA.MAC 


03-APR., 


. .1^ 


KDJllA.MAC 


03-APR.. 


..J2 


KDJllA.MAC 


03-APR.. 


. .J* 


KDJ11A.HAC 


03-APR. . 


..K2 


KDJllA.MAC 


03-APR,. 


..K6 


KDJllA.MAC 


03-APR.. 


. ,L2 


KDJllA.MAC 


03-APR.. 


,.L6 


KDJllA.MAC 


03-APR.. 


. .M2 


KDJUA.MAC 


03-APR.. 


,,M6 


KDJllA.MAC 
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